Test conf
This commit is contained in:
12
Project-01/uap25-pro01-tram/tramcode/mod.tram
Normal file
12
Project-01/uap25-pro01-tram/tramcode/mod.tram
Normal file
@@ -0,0 +1,12 @@
|
||||
# Quellkode: let mod(a,b) { a - (a / b) * b } in mod(14,5)
|
||||
# Annahmen: a→stack[0], b→stack[1], PP=0, FP=0, TOP=-1
|
||||
INVOKE 2 MOD 0
|
||||
HALT
|
||||
|
||||
MOD: LOAD 1 0
|
||||
LOAD 1 0
|
||||
DIV
|
||||
LOAD 2 0
|
||||
MUL
|
||||
SUB
|
||||
RETURN
|
||||
Reference in New Issue
Block a user