diff --git a/src/Nand2Tetris/VM.hs b/src/Nand2Tetris/VM.hs
index bdc8d03..1b69363 100644
--- a/src/Nand2Tetris/VM.hs
+++ b/src/Nand2Tetris/VM.hs
@@ -70,6 +70,12 @@ instrAnnotation :: VMInstruction -> T.Text
 instrAnnotation (VMArithmetic ACAdd) = "add"
 instrAnnotation (VMArithmetic ACSub) = "sub"
 instrAnnotation (VMArithmetic ACNeg) = "neg"
+instrAnnotation (VMArithmetic ACEq) = "eq"
+instrAnnotation (VMArithmetic ACGt) = "gt"
+instrAnnotation (VMArithmetic ACLt) = "lt"
+instrAnnotation (VMArithmetic ACAnd) = "and"
+instrAnnotation (VMArithmetic ACOr) = "or"
+instrAnnotation (VMArithmetic ACNot) = "not"
 instrAnnotation (VMMemAccess accessType segment) =
   strAccessType <> " " <> strSegment
   where