native engage-compatibility-mode func # { pop } func puts { print } func fcall { call } func strconcat { concat } func aget { swap :get } func stoi { _mega } func itos { _str } def argv'pre-isbplmod &argv =argv'pre-isbplmod func argv { def args argv'pre-isbplmod call =args def nargs args:len 2 - anew =nargs args nargs 2 0 nargs:len acopy nargs } func inc { "isbpl.spl: ISBPL code tried to call inc, an untranslatable function" println pop } func dec { "isbpl.spl: ISBPL code tried to call inc, an untranslatable function" println pop }