--- gforth/see.fs	2001/04/08 13:48:12	1.37
+++ gforth/see.fs	2002/01/04 20:31:54	1.38
@@ -271,7 +271,7 @@ VARIABLE C-Pass
     THEN ;
 
 : c-call
-    Display? IF  dup @ body> .word bl cemit  THEN  cell+ ;
+    Display? IF  ." call " dup @ body> .word bl cemit  THEN  cell+ ;
 
 : .name-without ( addr -- addr )
 \ prints a name without () e.g. (+LOOP) or (s")