aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-29 15:59:09 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-29 15:59:09 -0400
commit7fc933d2408509ab16b66246bcfa05582758be6d (patch)
tree3457492a745640cb3a49872b981ddca36ab15069
parenta9ee9a0140b94f6e506e3500206af7ed03711f10 (diff)
Generate conditional function call instructions until the compiler handles 𝕨
-rwxr-xr-xc.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/c.bqn b/c.bqn
index d48a7175..5bbfbfd6 100755
--- a/c.bqn
+++ b/c.bqn
@@ -186,7 +186,7 @@ DParse ← {nv‿r𝕊𝕩:
dr←/s>o+`⊸⊏0∾lo⋄rt←/𝕩=2⊑bB
or←⍋idor∾g⊏˜∾⟨cn,cn,b,b,rt,1+/a,dr,l,l,si,si,oa+1⌈oa⊏os,(dy×⊏⟜os)⊸+fa+dy⟩
bc0←∾idbc∾⟨0¨cn,u⊐ob,15¨b,1+↕≠b⟩
- bc←or⊏bc0∾∾⟨25¨rt,(11-⊑bG)+a/𝕩,14¨dr,3¨l,ll,3¨si,sll,5+oa⊏r,5+dy+4×fa⊏tr⟩
+ bc←or⊏bc0∾∾⟨25¨rt,(11-⊑bG)+a/𝕩,14¨dr,3¨l,ll,3¨si,sll,5+oa⊏r,16+dy-7×fa⊏tr⟩
fs←(ft⊏⥊"fmd"≍⌜⌽↕2)∾¨(/1∾or∊bc0+⟜↕○≠rt)≍○<¨(ft⊏spd)∾⟜(⥊¨↑⟜•a)¨lc
⟨LEBv bc,u,fs⟩
}