update cc.bqn

This commit is contained in:
dzaima 2021-04-29 00:32:52 +03:00
parent 7786beeed1
commit a1fec732b0
2 changed files with 8 additions and 7 deletions

14
cc.bqn
View File

@ -33,20 +33,20 @@ useInd ← "-i"≡⊑args ⋄ args↓˜↩useInd
Comp ((<"inc(runtime[""])"˙)¨62) glyphs _getComp Comp ((<"inc(runtime[""])"˙)¨62) glyphs _getComp
J \n¨ J \n¨
Fconst @NumChar, Str, Fconst @NumChar, Str,
prov {"inc("𝕩")"}¨"bi_type""bi_fill""bi_log""bi_grLen""bi_grOrd""bi_asrt""bi_add""bi_sub""bi_mul""bi_div""bi_pow""bi_floor""bi_eq""bi_le""bi_fne""bi_shape""bi_pick""bi_ud""bi_tbl""bi_scan""bi_fillBy""bi_val""bi_catch" Fout {((𝕩)LI F¨,L Fconst¨,L (LI F¨)¨,L (L F¨)¨) {𝕎𝕩}¨ 𝕩}
Fout {((𝕩)LI F¨,L ·prov(𝕨0) Fconst¨,L (LI F¨)¨,L (L F¨)¨) {𝕎𝕩}¨ 𝕩}
Frun 1Fout Frun 1Fout
Long {¯2𝕩¨<","\n} Long {¯2𝕩¨<","\n}
RT {𝕩 RT {
primsrefImport"pr.bqn" lprims srcneedinputs𝕩Import"pr.bqn"
Long Frun l(1) (l) prims _getComp ref pr"runtime_0""provide"{(𝕨<(<{"inc("𝕨"["𝕩"])"}F¨)()¨𝕩)˜(𝕩)need}((-1+1=𝕩))inputs
Long Fout pr need _getComp src
} }
CArg {J (¯5𝕩˙) FLines "c.bqn"} CArg {J (¯5𝕩˙) FLines "c.bqn"}
LFC LongFoutComp LFC LongFoutComp
•Out(¬return) ("r""c""cc""f""e""p") •Out(¬return) ("r""r0""r1""c""cc""f""e""p")
RT RT2, RT0, RT1
{𝕩LFC CArg "⟨""⟩"«","¨'"'(˜)¨glyphs} {𝕩LFC CArg "⟨""⟩"«","¨'"'(˜)¨glyphs}
{𝕩LFC "{""}"˜CArg"𝕩"} {𝕩LFC "{""}"˜CArg"𝕩"}
{𝕩LFC FChars "f.bqn"} {𝕩LFC FChars "f.bqn"}

View File

@ -120,6 +120,7 @@ int main() {
for (i32 i = 0; i < rtLen; i++) inc(fruntime[i]); for (i32 i = 0; i < rtLen; i++) inc(fruntime[i]);
B frtObj = m_caB(rtLen, fruntime); B frtObj = m_caB(rtLen, fruntime);
B provide[] = {bi_type,bi_fill,bi_log,bi_grLen,bi_grOrd,bi_asrt,bi_add,bi_sub,bi_mul,bi_div,bi_pow,bi_floor,bi_eq,bi_le,bi_fne,bi_shape,bi_pick,bi_ud,bi_tbl,bi_scan,bi_fillBy,bi_val,bi_catch};
Block* runtime_b = compile( Block* runtime_b = compile(
#include "runtime" #include "runtime"