--- gforth/cross.fs	2009/12/31 15:32:35	1.168
+++ gforth/cross.fs	2010/04/05 22:17:56	1.169
@@ -2949,6 +2949,11 @@ by (Field)
     T 1 cells H dup ;
 >CROSS
 
+\ ABI-CODE support
+Builder (ABI-CODE)
+Build: ;Build
+by: :doabicode noop ;DO
+
 \ Input-Methods                                            01py
 
 Builder input-method