diff options
| author | Loic Guegan <manzerberdes@gmx.com> | 2019-02-19 14:09:50 +0100 |
|---|---|---|
| committer | Loic Guegan <manzerberdes@gmx.com> | 2019-02-19 14:09:50 +0100 |
| commit | 9a72240067f333084ab707a86ad8ec8757f3a68d (patch) | |
| tree | 9a97ac5d6c1da2c917e2963e25089a5d2786a105 | |
| parent | 78f05ba362fc52db5357eaa177603f10ff7bb691 (diff) | |
| -rw-r--r-- | convert.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/convert.lisp b/convert.lisp index 4cb503e..cc6de38 100644 --- a/convert.lisp +++ b/convert.lisp @@ -20,6 +20,7 @@ ;;; Program entry point (defun convert (platform dot-file) "Parse Simgrid platform then write it into a dot file." + (setf *hosts* nil *links* nil) ; Be sure to clear hosts and links (let ((xml-parser (make-instance 'xml-parser-state :seed (cons 0 0) :new-element-hook #'handle-element))) |