add Character/digit

Author: bobbicodes

shadow-cljs.edn

@@ -9,6 +9,7 @@
                              context lang-clojure-eval.main/context
                              isISOControl lang-clojure-eval.character/isISOControl
                              isLetter lang-clojure-eval.character/isLetter
+                             digit lang-clojure-eval.character/digit
                              ;; parseInt causes ReferenceError if exported,
                              ;; but somehow works if it's not... why?
                              ;parseInt lang-clojure-eval.integer/parse-int

src/lang_clojure_eval/character.cljs

@@ -1,5 +1,9 @@
 (ns lang-clojure-eval.character
-  (:require [clojure.string :as str]))
+  (:require [clojure.string :as str]
+            [clojure.edn :as edn]))
+
+(defn digit [c r]
+  (edn/read-string (str r "r" c)))
 
 (defn isLetter [char]
   (and (= 1 (count (str char)))

src/lang_clojure_eval/main.cljs

@@ -13,7 +13,8 @@
                        :allow :all}
              :namespaces {'clojure.core {'format goog.string/format}
                           'lang-clojure-eval.character
-                          {'isISOControl char/isISOControl
+                          {'digit char/digit
+                           'isISOControl char/isISOControl
                            'isLetter char/isLetter}
                           'lang-clojure-eval.integer
                           {'parseInt int/parse-int}}}))