[#201] as-z80: tests

emustudio · Mar 14, 2022 · b72fbe3 · b72fbe3
1 parent 2487d55
commit b72fbe3
Showing 1 changed file with 20 additions and 0 deletions.
diff --git a/...80/src/test/java/net/emustudio/plugins/compiler/asZ80/parser/LexicalAnalyzerImplTest.java b/...80/src/test/java/net/emustudio/plugins/compiler/asZ80/parser/LexicalAnalyzerImplTest.java
@@ -197,6 +197,26 @@ public void parseCall() {
         assertTokenTypesIgnoreCase("call pet", OPCODE_CALL, COND_WS, ID_IDENTIFIER, EOF);
         assertTokenTypesIgnoreCase("call pe?", OPCODE_CALL, COND_WS, ID_IDENTIFIER, EOF);
         assertTokenTypesIgnoreCase("call pe>", OPCODE_CALL, COND_WS, COND_PE, OP_GT, EOF);
+        assertTokenTypesIgnoreCase("call pe#", OPCODE_CALL, COND_WS, COND_PE, COMMENT, EOF);
+        assertTokenTypesIgnoreCase("call pe\"", OPCODE_CALL, COND_WS, COND_PE, ERROR, EOF);
+        assertTokenTypesIgnoreCase("call pe'", OPCODE_CALL, COND_WS, COND_PE, ERROR, EOF);
+        assertTokenTypesIgnoreCase("call pe(", OPCODE_CALL, COND_WS, COND_PE, SEP_LPAR, EOF);
+        assertTokenTypesIgnoreCase("call pe)", OPCODE_CALL, COND_WS, COND_PE, SEP_RPAR, EOF);
+        assertTokenTypesIgnoreCase("call pe,", OPCODE_CALL, COND_WS, COND_PE, SEP_COMMA, EOF);
+        assertTokenTypesIgnoreCase("call pe.", OPCODE_CALL, COND_WS, COND_PE, ERROR, EOF);
+        assertTokenTypesIgnoreCase("call pe=", OPCODE_CALL, COND_WS, COND_PE, OP_EQUAL, EOF);
+        assertTokenTypesIgnoreCase("call pe<", OPCODE_CALL, COND_WS, COND_PE, OP_LT, EOF);
+        assertTokenTypesIgnoreCase("call pe&", OPCODE_CALL, COND_WS, COND_PE, OP_AND, EOF);
+        assertTokenTypesIgnoreCase("call pe+", OPCODE_CALL, COND_WS, COND_PE, OP_ADD, EOF);
+        assertTokenTypesIgnoreCase("call pe-", OPCODE_CALL, COND_WS, COND_PE, OP_SUBTRACT, EOF);
+        assertTokenTypesIgnoreCase("call pe/", OPCODE_CALL, COND_WS, COND_PE, OP_DIVIDE, EOF);
+        assertTokenTypesIgnoreCase("call pe;", OPCODE_CALL, COND_WS, COND_PE, COMMENT, EOF);
+        assertTokenTypesIgnoreCase("call pe/**/", OPCODE_CALL, COND_WS, COND_PE, COMMENT2, EOF);
+        assertTokenTypesIgnoreCase("call pe", OPCODE_CALL, COND_WS, COND_PE, EOF);
+        assertTokenTypesIgnoreCase("call pe\n", OPCODE_CALL, COND_WS, COND_PE, EOL, EOF);
+        assertTokenTypesIgnoreCase("call pe\f", OPCODE_CALL, COND_WS, COND_PE, WS, EOF);
+        assertTokenTypesIgnoreCase("call pe\r", OPCODE_CALL, COND_WS, COND_PE, EOF);
+        assertTokenTypesIgnoreCase("call pe0", OPCODE_CALL, COND_WS, ID_IDENTIFIER, EOF);
     }
 
     @Test