hopefully last fix for alien.factor

diff --git a/basis/compiler/tests/alien.factor b/basis/compiler/tests/alien.factor
index 8d876891f276da2bf9511caa060fcc6cf8d59a5f..6802b43de6e40987a1a6bcc351cf609e7042d3e2 100644 (file)
--- a/basis/compiler/tests/alien.factor
+++ b/basis/compiler/tests/alien.factor
@@ -21,6 +21,8 @@ IN: compiler.tests
 "f-stdcall" libfactor-ffi-tests-path "stdcall" add-library
 >>
 
+LIBRARY: f-cdecl
+
 FUNCTION: void ffi_test_0 ;
 [ ] [ ffi_test_0 ] unit-test
 
@@ -170,7 +172,7 @@ FUNCTION: void ffi_test_20 double x1, double x2, double x3,
 
 : ffi_test_31_point_5 ( a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a a -- result )
     "float"
-    "cdecl" "ffi_test_31_point_5"
+    "f-cdecl" "ffi_test_31_point_5"
     { "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" "float" }
     alien-invoke ;