13 lines
194 B
Text
13 lines
194 B
Text
include 'std/lstd.fa'
|
|
include 'std/logic.fa'
|
|
|
|
|
|
fun main [ str str int ] int eo
|
|
2 10 dvm sub -5 eql #not if
|
|
"0 - 5 = -5, but isn't" #error
|
|
end
|
|
|
|
%EXIT_SUCCESS
|
|
end
|
|
|
|
#main #exit
|