--- gforth/engine/forth.h	2006/01/05 01:37:33	1.71
+++ gforth/engine/forth.h	2006/03/11 22:22:40	1.72
@@ -336,7 +336,7 @@ void faxpy(Float ra, Float *f_x, Cell ns
 UCell lshift(UCell u1, UCell n);
 UCell rshift(UCell u1, UCell n);
 int gforth_system(Char *c_addr, UCell u);
-
+Cell capscompare(Char *c_addr1, UCell u1, Char *c_addr2, UCell u2);
 
 /* signal handler stuff */
 void install_signal_handlers(void);
@@ -390,7 +390,7 @@ extern void gforth_callback(Xt* fcall, v
 extern Cell *gforth_RP;
 extern Address gforth_LP;
 #include <ffi.h>
-extern void gforth_callback(ffi_cif * cif, void * resp, void ** args, Xt * ip);
+extern void gforth_callback(ffi_cif * cif, void * resp, void ** args, void * ip);
 #endif
 
 #ifdef GFORTH_DEBUGGING