diff --git a/common/forth_namespace_tests.fs b/common/forth_namespace_tests.fs index 775e89e..fb0c55b 100644 --- a/common/forth_namespace_tests.fs +++ b/common/forth_namespace_tests.fs @@ -159,9 +159,6 @@ e: check-tier2-opcodes ;e e: check-tier1-opcodes - out: 0 - out: 1 - out: -1 out: nip out: rdrop out: */ diff --git a/common/tier1_opcodes.h b/common/tier1_opcodes.h index 466ecbd..691e017 100644 --- a/common/tier1_opcodes.h +++ b/common/tier1_opcodes.h @@ -13,9 +13,9 @@ // limitations under the License. #define TIER1_OPCODE_LIST \ - X("0", ZERO, PUSH 0) \ - X("1", ONE, PUSH 1) \ - X("-1", NEGATIVEONE, PUSH -1) \ + XV(internals, "0", ZERO, PUSH 0) \ + XV(internals, "1", ONE, PUSH 1) \ + XV(internals, "-1", NEGATIVEONE, PUSH -1) \ Y(nip, NIP) \ Y(rdrop, --rp) \ XV(forth, "*/", STARSLASH, SSMOD_FUNC; NIP) \