--- gforth/prims2x.fs	2001/12/09 19:12:45	1.101
+++ gforth/prims2x.fs	2001/12/24 14:09:06	1.102
@@ -767,7 +767,7 @@ stack inst-stream IP Cell
 \      cr ;
 
 : output-label ( -- )  
-    ." (Label)&&I_" prim prim-c-name 2@ type ." ," cr ;
+    ." INST_ADDR(" prim prim-c-name 2@ type ." )," cr ;
 
 : output-alias ( -- ) 
     ( primitive-number @ . ." alias " ) ." Primitive " prim prim-name 2@ type cr ;