make precompiled.bqn run within CBQN
This commit is contained in:
parent
f9253a477e
commit
026b15977b
@ -11,12 +11,12 @@ tests ← •FLines path∾"/test/cases/prim.bqn"
|
|||||||
{tests↩𝕩}⍟(×≠) 2↓•args
|
{tests↩𝕩}⍟(×≠) 2↓•args
|
||||||
|
|
||||||
('#'≠ ·⊑ ∾⟜"#")◶@‿{
|
('#'≠ ·⊑ ∾⟜"#")◶@‿{
|
||||||
'%'⊸∊◶{𝕤
|
(⊑'%'⊸∊)◶{𝕤
|
||||||
•Out 𝕩
|
•Out 𝕩
|
||||||
"src/gen/interp" •FChars ⟨1,path,𝕩⟩ •Import "cc.bqn"
|
"src/gen/interp" •FChars ⟨1,path,𝕩⟩ •Import "cc.bqn"
|
||||||
(×⊑)◶@‿{𝕤⋄•Out "############ Failed to compile! ############" ⋄ •Out¨1↓𝕩}{env⇐<"PATH="∾envP}•SH"make"‿"f=-DPRECOMP"‿"t=precomp"‿"c"
|
(×⊑)◶@‿{𝕤⋄•Out "############ Failed to compile! ############" ⋄ •Out¨1↓𝕩}{env⇐<"PATH="∾envP}•SH"make"‿"f=-DPRECOMP"‿"t=precomp"‿"c"
|
||||||
code‿out‿err←•SH"./BQN"
|
code‿out‿err←•SH⟨"./BQN"⟩
|
||||||
•Out out
|
•Out out
|
||||||
{𝕤⋄•Out"exit code "∾(⍕code) ⋄ •Out err}⍟(×code) err
|
{𝕤⋄•Out"exit code "∾(•Repr code) ⋄ •Out err}⍟(×code) err
|
||||||
}‿⊢
|
}‿⊢
|
||||||
}¨tests
|
}¨tests
|
||||||
@ -8,7 +8,7 @@
|
|||||||
/* sort.c*/A(gradeUp,"⍋") A(gradeDown,"⍒") \
|
/* sort.c*/A(gradeUp,"⍋") A(gradeDown,"⍒") \
|
||||||
/* everything before the definition of •Type is defined to be pure, and everything after is not */ \
|
/* everything before the definition of •Type is defined to be pure, and everything after is not */ \
|
||||||
/* sysfn.c*/M(type,"•Type") M(decp,"•Decompose") M(primInd,"•PrimInd") M(glyph,"•Glyph") A(fill,"•FillFn") M(sys,"•getsys") A(grLen,"•GroupLen") D(grOrd,"•GroupOrd") \
|
/* sysfn.c*/M(type,"•Type") M(decp,"•Decompose") M(primInd,"•PrimInd") M(glyph,"•Glyph") A(fill,"•FillFn") M(sys,"•getsys") A(grLen,"•GroupLen") D(grOrd,"•GroupOrd") \
|
||||||
/* sysfn.c*/M(repr,"•Repr") M(fmt,"•Fmt") A(asrt,"!") A(casrt,"!") M(out,"•Out") M(show,"•Show") A(bqn,"•BQN") M(sh,"•SH") M(fromUtf8,"•FromUTF8") \
|
/* sysfn.c*/M(repr,"•Repr") M(fmt,"•Fmt") A(asrt,"!") A(casrt,"!") M(out,"•Out") M(show,"•Show") A(bqn,"•BQN") A(sh,"•SH") M(fromUtf8,"•FromUTF8") \
|
||||||
/* sysfn.c*/D(cmp,"•Cmp") A(hash,"•Hash") M(unixTime,"•UnixTime") M(monoTime,"•MonoTime") M(delay,"•Delay") M(makeRand,"•MakeRand") M(reBQN,"•ReBQN") M(exit,"•Exit") M(getLine,"•GetLine") \
|
/* sysfn.c*/D(cmp,"•Cmp") A(hash,"•Hash") M(unixTime,"•UnixTime") M(monoTime,"•MonoTime") M(delay,"•Delay") M(makeRand,"•MakeRand") M(reBQN,"•ReBQN") M(exit,"•Exit") M(getLine,"•GetLine") \
|
||||||
/*internal.c*/M(itype,"•internal.Type") M(elType,"•internal.ElType") M(refc,"•internal.Refc") M(isPure,"•internal.IsPure") A(info,"•internal.Info") \
|
/*internal.c*/M(itype,"•internal.Type") M(elType,"•internal.ElType") M(refc,"•internal.Refc") M(isPure,"•internal.IsPure") A(info,"•internal.Info") \
|
||||||
/*internal.c*/M(squeeze,"•internal.Squeeze") M(deepSqueeze,"•internal.DeepSqueeze") \
|
/*internal.c*/M(squeeze,"•internal.Squeeze") M(deepSqueeze,"•internal.DeepSqueeze") \
|
||||||
|
|||||||
@ -758,6 +758,10 @@ B sh_c1(B t, B x) {
|
|||||||
thrM("•SH: CBQN was built without <spawn.h>");
|
thrM("•SH: CBQN was built without <spawn.h>");
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
B sh_c2(B t, B w, B x) {
|
||||||
|
dec(w);
|
||||||
|
return sh_c1(t, x);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
B getInternalNS(void);
|
B getInternalNS(void);
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user