$inc fvmstd.fp proc main # Basic test for getuint and putuint "Sum Program" :puts :newline :getuint :getuint u+ :putuint :newline endproc