diff --git a/src/Instructions/IntInstructions.hs b/src/Instructions/IntInstructions.hs index 50399bf..d12ee6a 100644 --- a/src/Instructions/IntInstructions.hs +++ b/src/Instructions/IntInstructions.hs @@ -1,7 +1,7 @@ module Instructions.IntInstructions where import State -import Debug.Trace +-- import Debug.Trace instructionIntAdd :: State -> State instructionIntAdd state@(State {int = (i1 : i2 : is)}) = state {int = i2 + i1 : is}