diff --git a/mach/6500/cg/table b/mach/6500/cg/table
index d96e40809..3db0b198d 100644
--- a/mach/6500/cg/table
+++ b/mach/6500/cg/table
@@ -2151,9 +2151,11 @@ lpb	| | | | adp 2 |
 mon	| R16 |
 		"jsr Mon"
 					| %[1] | |
-nop	| |
+nop	| STACK |
+#ifdef DEBUG
 		allocate(R16)
 		"jsr Printstack"
+#endif
 					| | |
 rck	| R16 | | | |
 rtt	| |
diff --git a/mach/z80/cg/table b/mach/z80/cg/table
index 42a366d18..3f36dc87f 100644
--- a/mach/z80/cg/table
+++ b/mach/z80/cg/table
@@ -1357,8 +1357,12 @@ lni	| |			 allocate(HL_REG)
 				"inc (hl)"
 				erase(HL)		| | |
 lpb		| | 		|			| adp 4 |
-nop		| |		allocate(ALL_REG)
-				"call .nop"	| | |
+nop		| STACK |
+#ifdef DEBUG
+				allocate(ALL_REG)
+				"call .nop"
+#endif
+							| | |
 rck $1 == 2 | STACK |		 allocate(ALL_REG)
 				"call .rck"
 									| | |
diff --git a/mach/z8000/cg/table b/mach/z8000/cg/table
index 08b0400bc..5a2ac0229 100644
--- a/mach/z8000/cg/table
+++ b/mach/z8000/cg/table
@@ -1708,7 +1708,11 @@ lin	| | "ld hol0, $$$1"  samecc	| | |
 lni	| | "inc hol0"	| | |
 lpb	| | | | adp SL	|
 mon	| STACK	| "calr mon"	| | |
-nop	| STACK	| "calr noop"		| | |
+nop	| STACK	|
+#ifdef DEBUG
+	"calr noop"
+#ENDIF
+					| | |
 rtt	| | | | ret 0	|
 sig	| REG	| allocate(REG)
 		  move( {da2, "trppc"}, %[a] )