aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-09-03 22:44:49 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-09-03 22:44:49 -0400
commit0ed161fa6b0aa5c24206a2b989a169340fd75e83 (patch)
treec8b1bd109dcf16ef4f7215de020a3e2a2333c321 /src
parent22a33e01325ba2331a6b28dfc3d466c119d0834c (diff)
Add @ support to dbqn-based compiler
Diffstat (limited to 'src')
-rw-r--r--src/c.bqn7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/c.bqn b/src/c.bqn
index 27350f03..e70a12a9 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -1,7 +1,6 @@
#! ./dzref
-nul←' '-32 # @
-nl←nul+10
+nl←@+10
charSet←∾charGroups←⟨
chF←"+-×÷⋆√⌊⌈|¬∧∨<>≠=≤≥≡≢⊣⊢⥊∾≍↑↓↕⌽⍉/⍋⍒⊏⊑⊐⊒∊⍷⊔!" # Function
"˙˜˘¨⌜⁼´˝`" # Modifier
@@ -16,7 +15,7 @@ charSet←∾charGroups←⟨
'0'+↕10 # Digit
"¯.π∞" # Numeric
"_"∾˜⥊"aA"+⌜↕na←26 # Alphabetic
- " "∾nul+9 # Whitespace
+ " "∾@+9 # Whitespace
# #'" eliminated during tokenization
ErrUnknownChars←{
@@ -72,7 +71,7 @@ ReadNum←{
m←(n=⊑)◶⟨Pos,-·Pos 1⊸↓⟩e↑𝕩
𝕩×⟜(10⋆·Int(e+1)↓⊣)˜⍟(e<≠𝕩)m
}
-LitVal←(⊑⟨⊑bU,''','"'⟩⊐⊏)◶⟨nul,1⊸⊑,1⊸↓,ReadNum⟩
+LitVal←(⊑⟨⊑bU,''','"'⟩⊐⊏)◶⟨@,1⊸⊑,1⊸↓,ReadNum⟩
LEBv ← {