1 files changed, 6 insertions, 0 deletions
diff --git a/json.lisp b/json.lisp
index cc3e0c1..44d6262 100644
--- a/json.lisp
+++ b/json.lisp
@@ -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)))