fix ffi test

diff --git a/core/alien/compiler/compiler-tests.factor b/core/alien/compiler/compiler-tests.factor
index 57bf163443c9af39f5bee1cc670d1ce935ff57a2..5d847e364f0fb73dfae7d40d847958d1b8d9a3e2 100755 (executable)
--- a/core/alien/compiler/compiler-tests.factor
+++ b/core/alien/compiler/compiler-tests.factor
@@ -364,9 +364,9 @@ FUNCTION: ulonglong ffi_test_38 ( ulonglong x, ulonglong y ) ;
         + + 1+
     ] alien-callback ;
 
-FUNCTION: void int_ffi_test_36_point_5 ( ) ;
+FUNCTION: void ffi_test_36_point_5 ( ) ;
 
-[ ] [ int_ffi_test_36_point_5 ] unit-test
+[ ] [ ffi_test_36_point_5 ] unit-test
 
 FUNCTION: int ffi_test_37 ( void* func ) ;
 

diff --git a/vm/ffi_test.c b/vm/ffi_test.c
index 4293a6bbae61cace10a22b12095f0f597f706236..5cdfbb2a9e3e131a98b9875850c9c2be3ff5cccc 100755 (executable)
--- a/vm/ffi_test.c
+++ b/vm/ffi_test.c
@@ -253,9 +253,9 @@ double ffi_test_36(struct test_struct_12 x)
 
 static int global_var;
 
-void int_ffi_test_36_point_5(void)
+void ffi_test_36_point_5(void)
 {
-       printf("int_ffi_test_36_point_5\n");
+       printf("ffi_test_36_point_5\n");
        global_var = 0;
 }
 

diff --git a/vm/ffi_test.h b/vm/ffi_test.h
index d455d999b10bae14871c8852103dd436affb2b73..0f51092d25036b19fbc6d1cabfa4198c7d0b7a2e 100755 (executable)
--- a/vm/ffi_test.h
+++ b/vm/ffi_test.h
@@ -62,7 +62,7 @@ struct test_struct_12 { int a; double x; };
 
 DLLEXPORT double ffi_test_36(struct test_struct_12 x);
 
-DLLEXPORT void int_ffi_test_36_point_5(void);
+DLLEXPORT void ffi_test_36_point_5(void);
 
 DLLEXPORT int ffi_test_37(int (*f)(int, int, int));