diff options
| author | Joel Martin <github@martintribe.org> | 2015-02-16 00:01:10 -0600 |
|---|---|---|
| committer | Joel Martin <github@martintribe.org> | 2015-02-16 00:01:10 -0600 |
| commit | d90c784472f6131f28612eb6eaa02404e002178d (patch) | |
| tree | 81bea60b366d3168bc58a7976918b8d436e895fa /miniMAL/reader.json | |
| parent | 2774a151313c2b6bef052f5f8906b912c7f60bf8 (diff) | |
| download | mal-d90c784472f6131f28612eb6eaa02404e002178d.tar.gz mal-d90c784472f6131f28612eb6eaa02404e002178d.zip | |
miniMAL: stepA. Comments. Add impl Makefile for stats.
Diffstat (limited to 'miniMAL/reader.json')
| -rw-r--r-- | miniMAL/reader.json | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/miniMAL/reader.json b/miniMAL/reader.json index 108d626..428d12d 100644 --- a/miniMAL/reader.json +++ b/miniMAL/reader.json @@ -26,7 +26,11 @@ ["def", "tokenize", ["fn", ["strn"], ["let", ["re-str", ["`", "[\\s,]*(~@|[\\[\\]{}()'`~^@]|\"(?:\\\\.|[^\\\\\"])*\"|;.*|[^\\s\\[\\]{}('\"`,;)]*)"], "re", ["RegExp", "re-str", ["`", "g"]]], - ["re-matches", "re", "strn", ["`", []]]]]], + [".", + ["re-matches", "re", "strn", ["`", []]], + ["`", "filter"], + ["fn", ["x"], ["not", ["=", ["get", "x", 0], + ["`", ";"]]]]]]]], ["def", "read-atom", ["fn", ["rdr"], ["let", ["token", ["rdr-next", "rdr"]], |