diff options
Diffstat (limited to 'src/main.lisp')
| -rw-r--r-- | src/main.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/main.lisp b/src/main.lisp index be9f69a..9692603 100644 --- a/src/main.lisp +++ b/src/main.lisp @@ -38,7 +38,7 @@ _/_/ _/_/ " (error "The file is not an asm source code file.~%")) (t (let ((str (uiop:read-file-string file))) (if str - (progn (pprint (esrap:parse 'parse:text (string-upcase str))) + (progn (pprint (esrap:parse 'parse:str->ast (string-upcase str))) (terpri) (maphash #'(lambda (k v) (format t "~A => ~A~%" k v)) util:label-table) (format t "---~%")) |