diff options
| author | Darren Bane <dbane@tilde.institute> | 2020-12-11 14:14:33 +0000 |
|---|---|---|
| committer | Darren Bane <dbane@tilde.institute> | 2020-12-11 14:14:33 +0000 |
| commit | 207cda23007f05dd954ee82511babba457465265 (patch) | |
| tree | 44c143f1554b83d31eaac374a738b7fbaaba459d /cparse.lisp | |
| parent | 76105d297c5b56cf097bcf129e6de56d681744cc (diff) | |
| parent | f16f553f2effb7ac8120fb8a15b59bcdd480a97d (diff) | |
| download | lsp-207cda23007f05dd954ee82511babba457465265.tar.gz | |
Merge branch 'master' of /home/dbane/public_repos/lsp into master
Diffstat (limited to 'cparse.lisp')
| -rw-r--r-- | cparse.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cparse.lisp b/cparse.lisp index 602dc76..31d7817 100644 --- a/cparse.lisp +++ b/cparse.lisp @@ -27,7 +27,7 @@ ((string= s ">") 'great))) (defun parse (str) - (let* ((cl (init-lex str)) + (let* ((cl (make-instance (find-class '<string-lexer>) 's str)) (tok (lexer cl))) (cond ((instancep tok (find-class '<lint>)) (make-instance (find-class '<line>) 'n n 'c (parse-cmd cl))) |