diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-03 22:44:49 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-03 22:44:49 -0400 |
| commit | 0ed161fa6b0aa5c24206a2b989a169340fd75e83 (patch) | |
| tree | c8b1bd109dcf16ef4f7215de020a3e2a2333c321 /src | |
| parent | 22a33e01325ba2331a6b28dfc3d466c119d0834c (diff) | |
Add @ support to dbqn-based compiler
Diffstat (limited to 'src')
| -rw-r--r-- | src/c.bqn | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -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 ← { |
