     3 ffi_test_35
 ] unit-test
 
-STRUCT: test-struct-12 { a int } { x float } ;
+STRUCT: test-struct-12 { a int } { x double } ;
 
 : make-struct-12 ( x -- alien )
     test-struct-12 <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 ;


] unit-test

STRUCT: test_struct_15
    { x float }
    { y float } ;

FUNCTION: test_struct_15 ffi_test_42 ( float x, float y ) ;

