erlang: working HCCForth N505 test