--- gforth/Attic/power.h	1996/07/26 15:28:30	1.4
+++ gforth/Attic/power.h	1996/07/26 16:16:55	1.5
@@ -72,7 +72,7 @@
    starts. Since a branch is only a cell on Power, we can use the
    second cell of the cfa for storing the does address */
 #define DOES_CODE(cfa) \
-     ({ unsigned *_cfa=(unsigned)(cfa); \
+     ({ unsigned *_cfa=(unsigned *)(cfa); \
 	_cfa[0]==(0x48000002|&&docol) ? DOES_CODE1(_cfa) : 0; })