Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP

Comparing changes

Choose two branches to see what's changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
base fork: Bronsa/clojurescript
...
head fork: Bronsa/clojurescript
Checking mergeability… Don't worry, you can still create the pull request.
  • 2 commits
  • 2 files changed
  • 0 commit comments
  • 1 contributor
Showing with 6 additions and 1 deletion.
  1. +1 −1  src/cljs/cljs/reader.cljs
  2. +5 −0 test/cljs/cljs/reader_test.cljs
View
2  src/cljs/cljs/reader.cljs
@@ -187,7 +187,7 @@ nil if the end of stream has been reached")
(defn not-implemented
[rdr ch]
(reader-error rdr "Reader for " ch " not implemented yet"))
-
+;; TODO: extensible dispatch here.
(defn read-dispatch
[rdr _]
(let [ch (read-char rdr)
View
5 test/cljs/cljs/reader_test.cljs
@@ -26,5 +26,10 @@
(assert (= false (reader/read-string "false")))
(assert (= "string" (reader/read-string "\"string\"")))
(assert (= "escape chars \t \r \n \\ \" \b \f" (reader/read-string "\"escape chars \\t \\r \\n \\\\ \\\" \\b \\f\"")))
+
+ ;; defrecords tests
+ (defrecord R [a b])
+
+ ;; extensible reader tests
:ok)

No commit comments for this range

Something went wrong with that request. Please try again.