FUNCTION: void* alien-parser-function-effect-test ( int *arg1 float arg2 ) ;
-{ ( arg1 arg2 -- void* ) } [
+[ ( arg1 arg2 -- void* ) ] [
\ alien-parser-function-effect-test "declared-effect" word-prop
] unit-test
-{ t } [ \ alien-parser-function-effect-test inline? ] unit-test
+[ t ] [ \ alien-parser-function-effect-test inline? ] unit-test
FUNCTION-ALIAS: (alien-parser-function-effect-test) void* alien-parser-function-effect-test ( int *arg1 float arg2 ) ;
-{ ( arg1 arg2 -- void* ) } [
+[ ( arg1 arg2 -- void* ) ] [
\ (alien-parser-function-effect-test) "declared-effect" word-prop
] unit-test
-{ t } [ \ (alien-parser-function-effect-test) inline? ] unit-test
+[ t ] [ \ (alien-parser-function-effect-test) inline? ] unit-test
CALLBACK: void* alien-parser-callback-effect-test ( int *arg1 float arg2 ) ;
-{ ( arg1 arg2 -- void* ) } [
+[ ( arg1 arg2 -- void* ) ] [
\ alien-parser-callback-effect-test "callback-effect" word-prop
] unit-test
-{ t } [ \ alien-parser-callback-effect-test inline? ] unit-test
+[ t ] [ \ alien-parser-callback-effect-test inline? ] unit-test
! Reported by mnestic
TYPEDEF: int alien-parser-test-int ! reasonably unique name...
-{ "OK!" } [
+[ "OK!" ] [
[
"USE: specialized-arrays SPECIALIZED-ARRAY: alien-parser-test-int" eval( -- )
! after restart, we end up here