format blocks
This commit is contained in:
parent
8934db0ec5
commit
2710786bf0
@ -100,6 +100,9 @@ B fmtF_c1(B t, B x) {
|
|||||||
if (ty==t_md1BI) { B r = fromUTF8l(format_pm1(c(Md1,x)->extra)); dec(x); return r; }
|
if (ty==t_md1BI) { B r = fromUTF8l(format_pm1(c(Md1,x)->extra)); dec(x); return r; }
|
||||||
if (ty==t_md2BI) { B r = fromUTF8l(format_pm2(c(Md2,x)->extra)); dec(x); return r; }
|
if (ty==t_md2BI) { B r = fromUTF8l(format_pm2(c(Md2,x)->extra)); dec(x); return r; }
|
||||||
if (ty==t_nfn) { B r = nfn_name(x); dec(x); return r; }
|
if (ty==t_nfn) { B r = nfn_name(x); dec(x); return r; }
|
||||||
|
if (ty==t_fun_block) { dec(x); return m_str8l("(function block)"); }
|
||||||
|
if (ty==t_md1_block) { dec(x); return m_str8l("(1-modifier block)"); }
|
||||||
|
if (ty==t_md2_block) { dec(x); return m_str8l("(2-modifier block)"); }
|
||||||
return m_str32(U"(fmtF: not given a runtime primitive)");
|
return m_str32(U"(fmtF: not given a runtime primitive)");
|
||||||
}
|
}
|
||||||
dec(x);
|
dec(x);
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user