diff options
Diffstat (limited to 'src')
| -rwxr-xr-x | src/cjs.bqn | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/cjs.bqn b/src/cjs.bqn index 2a282b84..e2e8b057 100755 --- a/src/cjs.bqn +++ b/src/cjs.bqn @@ -14,14 +14,13 @@ Esc←{ } Str ← "str("""∾Esc∾""")"˜ # A BQN string Char ← "'"(∾∾⊣)Esc∘⥊ # A BQN character -FP ← ∞⊸=◶⟨⍕,"Infinity"⟩ # Format positive number +F ← ⍕ # Format number +FP ← ∞⊸=◶⟨F,"Infinity"⟩ # Format positive number Num ← 0⊸≤◶⟨"-"∾FP∘|,FP⟩ # Format number -F ← ⍕ # Format number - compile ← •Import "c.bqn" useInd ← "-i"≡⊑args←•args ⋄ args↓˜↩useInd -Comp ← (3+useInd) ↑ ((<"runtime" Ind ⍕)¨↕62)⊸Compile +Comp ← (3+useInd) ↑ ((<"runtime" Ind F)¨↕62)⊸Compile J ← ∾∾⟜(@+10)¨ Fconst ← ≡◶⟨@⊸≤◶Num‿Char, Str, ⊑⟩ Fout ← (≠↑⟨F,Fconst,L F¨,F⟩˙) {L𝕎¨𝕩}¨ ⊢ |