 [ 1111 f 123456789 ffi_test_22 ] must-fail
 
 STRUCT: RECT
-    { x single-float } { y single-float }
-    { w single-float } { h single-float } ;
+    { x float } { y float }
+    { w float } { h float } ;
 
 : <RECT> ( x y w h -- rect )
     RECT <struct>


[ B{ 1 2 3 4 5 6 7 } ] [ ffi_test_30 ] unit-test

STRUCT: test-struct-8 { x float } { y float } ;

FUNCTION: double ffi_test_32 test-struct-8 x int y ;


    3 ffi_test_32
] unit-test

STRUCT: test-struct-9 { x float } { y float } ;

FUNCTION: double ffi_test_33 test-struct-9 x int y ;

