Add warning if no flags are set in getbrk

totalspectrum · Aug 30, 2023 · 8c09757 · 8c09757
1 parent 40fd35a
commit 8c09757
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/frontends/lexer.c b/frontends/lexer.c
@@ -3721,7 +3721,7 @@ instr_p2[] = {
     { "execf",  0x0d600033, P2_DST_CONST_OK, OPC_GENERIC_NR_NOFLAGS, 0 },
 
     { "getptr", 0x0d600034, DST_OPERAND_ONLY, OPC_GENERIC_NOFLAGS, 0 },
-    { "getbrk", 0x0d600035, DST_OPERAND_ONLY, OPC_GENERIC_NOFLAGS, FLAG_P2_STD },
+    { "getbrk", 0x0d600035, DST_OPERAND_ONLY, OPC_GENERIC_NOFLAGS, FLAG_P2_STD|FLAG_WARN_NOTUSED },
     { "cogbrk", 0x0d600035, DST_OPERAND_ONLY, OPC_GENERIC_NOFLAGS, 0 },
     { "brk",    0x0d600036, P2_DST_CONST_OK, OPC_BREAK, 0 },
     { "setluts",0x0d600037, P2_DST_CONST_OK, OPC_GENERIC_NR_NOFLAGS, 0 },