diff options
| -rw-r--r-- | json.lisp | 6 | ||||
| -rw-r--r-- | package.lisp | 4 |
2 files changed, 9 insertions, 1 deletions
@@ -125,3 +125,9 @@ null-symbol)) (_ whitespace)) v)) + +(defun parse-string (str) + (run json-value (input:from-string str))) + +(defun parse-file (file) + (run json-value (input:from-file file))) diff --git a/package.lisp b/package.lisp index 609b6b4..d2b1e6f 100644 --- a/package.lisp +++ b/package.lisp @@ -1,2 +1,4 @@ (defpackage #:json - (:use #:cl #:parser)) + (:use #:cl #:parser) + (:export #:parse-string + #:parse-file)) |