diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-22 17:14:59 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-22 17:14:59 -0400 |
| commit | c8fd5abe3abad1251ce438d3dd3e640acde8990f (patch) | |
| tree | c1c8696589be2182d5e479bfd5cb0ee95bed2346 /src/c.bqn | |
| parent | df6dec5e56f486a5c32c3e671a991e760a402998 (diff) | |
Fix handling of • with 𝕣-names
Diffstat (limited to 'src/c.bqn')
| -rw-r--r-- | src/c.bqn | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -70,7 +70,8 @@ Tokenize←{System‿vars←𝕨 i←l>n←l∧(+`w)⊏0∾¬wi # Identifier/Number masks num←is ReadNums○(((0∾us)<∨⟜«0∾n)/0⊸∾) t×l # Numbers ir←(us/˜«⊸<i)(⊢+∧⟜(2⊸=))wi/wk # Identifier role - fr←rr/˜if←(»⌈`)⊸<ig←(i>us)×+`w>n # Identifier groups and first character + if←(»⌈`)⊸<ig←(i>us)×+`w>n # Identifier groups and first character + fr←(1=wi/wt)<if/rr # Identifier is 𝕣-based w↩if∨n∧w0←w⋄ws←1=0⊸<⊸/wt/˜↩¬w/rr # Don't produce an identifier for 𝕣 {⟨𝕩/is,"𝕣 can't be used with other word characters"⟩!0}⍟(∨´)(i>us)∧(rr⊸≠∨if⊸<)ig⊏0∾fr {⟨is⊏˜𝕩/𝕨,"Numbers can't start with underscores"⟩!0}⍟(∨´⊢)⟜(ws<(⊑bA)>⊏⟜t)/rr<if |
