diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-28 17:23:29 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-08-28 17:24:39 -0400 |
| commit | d6544a57eca9d24bac9ace307c7542649f14d756 (patch) | |
| tree | 0707bc869d0061e15e958471d363f9beed50999d /src/cjs.bqn | |
| parent | 762d057c244240f0412da5f92de8330ea423d744 (diff) | |
Emit Math.PI in cjs.bqn when compiling compiler to avoid formatting inaccuracy
Diffstat (limited to 'src/cjs.bqn')
| -rwxr-xr-x | src/cjs.bqn | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/cjs.bqn b/src/cjs.bqn index 40ef9841..457ea664 100755 --- a/src/cjs.bqn +++ b/src/cjs.bqn @@ -23,7 +23,7 @@ _getComp ← { (4+useInd) ↑ (𝕗 •Import "c.bqn"){𝔽} } useInd ← "-i"≡⊑args←•args ⋄ args↓˜↩useInd Comp ← ((<"runtime" Ind F)¨↕62) glyphs _getComp ⊢ J ← ∾∾⟜(@+10)¨ -Fconst ← ≡◶⟨@⊸≤◶Num‿Char, Str, ⊑⟩ +Fconst ← ≡◶⟨@⊸≤◶{Num𝕩}‿Char, Str, ⊑⟩ Fout ← (≠↑⟨F,Fconst,L =◶⟨F,L(L F¨)¨⟩¨,L ·F¨2⊸↑,F⟩˙) {L𝕎¨𝕩}¨ ⊢ Long ← ∾ (≠↑1‿3/⟨" "⊸∾⋄((@+10)∾" ,")⊸∾⟩˙) {𝕎𝕩}¨ ⊢ LFC ← Long∘Fout∘Comp @@ -33,7 +33,7 @@ RT ← { pr←"runtime_0"‿"provide"{(∾𝕨<⊸(<∘Ind⟜F¨)⟜(↕≠)¨𝕩)⊏˜(∾𝕩)⊐∾need}○((-1+1=𝕩)⊸↑)inputs Long Fout pr need _getComp src } -CArg ← {J (¯5⊸↓∾𝕩˙)⌾⊑ •FLines "c.bqn"} +CArg ← {Num↩π⊸=◶Num‿"Math.PI" ⋄ J (¯5⊸↓∾𝕩˙)⌾⊑ •FLines "c.bqn"} SVG ← {∾⟨"Modify←GetHighlights←⊢⋄"⟩∾ •FChars∘∾⟜".bqn"¨ "../svg"‿𝕩} •Out (⊑"r"‿"r0"‿"r1"‿"c"‿"cc"‿"f"‿"e"‿"p"⊐⊏)◶⟨ |