update cc.bqn
This commit is contained in:
parent
7786beeed1
commit
a1fec732b0
14
cc.bqn
14
cc.bqn
@ -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 ← ≡◶⟨@⊸≤◶Num‿Char, Str, ⊑⟩
|
Fconst ← ≡◶⟨@⊸≤◶Num‿Char, 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 ← 1⊸Fout
|
Frun ← 1⊸Fout
|
||||||
Long ← {¯2↓∾𝕩∾¨<","∾\n}
|
Long ← {¯2↓∾𝕩∾¨<","∾\n}
|
||||||
|
|
||||||
RT ← {𝕩
|
RT ← {
|
||||||
prims‿ref←Import"pr.bqn" ⋄ l←≠∾prims
|
src‿need‿inputs←𝕩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 ← Long∘Fout∘Comp
|
LFC ← Long∘Fout∘Comp
|
||||||
|
|
||||||
•Out⍟(¬return) (⊑"r"‿"c"‿"cc"‿"f"‿"e"‿"p"⊐⊏)◶⟨
|
•Out⍟(¬return) (⊑"r"‿"r0"‿"r1"‿"c"‿"cc"‿"f"‿"e"‿"p"⊐⊏)◶⟨
|
||||||
RT
|
RT∘2, RT∘0, RT∘1
|
||||||
{𝕩⋄LFC CArg "⟨"∾"⟩"«∾","⊸∾¨'"'(⊣∾∾˜)¨glyphs}
|
{𝕩⋄LFC CArg "⟨"∾"⟩"«∾","⊸∾¨'"'(⊣∾∾˜)¨glyphs}
|
||||||
{𝕩⋄LFC "{"∾"}"∾˜CArg"𝕩"}
|
{𝕩⋄LFC "{"∾"}"∾˜CArg"𝕩"}
|
||||||
{𝕩⋄LFC FChars "f.bqn"}
|
{𝕩⋄LFC FChars "f.bqn"}
|
||||||
|
|||||||
@ -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"
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user