factor: more function messups

diff --git a/basis/compiler/tests/linkage-errors.factor b/basis/compiler/tests/linkage-errors.factor
index b622ccc09dbdaa75d6b7fdf0be6276ba50b6b7fd..42ba0974b4e6fbce584b7c1434d0c3aae60f955a 100644 (file)
--- a/basis/compiler/tests/linkage-errors.factor
+++ b/basis/compiler/tests/linkage-errors.factor
@@ -5,7 +5,7 @@ FROM: alien.libraries => add-library load-library ;
 IN: compiler.tests.linkage-errors
 
 ! Regression: calling an undefined function would raise a protection fault
-FUNCTION: void this_does_not_exist ( ) ;
+FUNCTION: void this_does_not_exist ( )
 
 [ this_does_not_exist ] try
 
@@ -26,7 +26,7 @@ FUNCTION: void this_does_not_exist ( ) ;
 
 LIBRARY: no_such_library
 
-FUNCTION: void no_such_function ( ) ;
+FUNCTION: void no_such_function ( )
 
 [ no_such_function ] try
 

diff --git a/basis/compiler/tests/x87-regression.factor b/basis/compiler/tests/x87-regression.factor
index 9692f787f234852495ad8f035315c897d779e993..53085bb1401c0a2d4c10d9fa77f5032a9e16d823 100644 (file)
--- a/basis/compiler/tests/x87-regression.factor
+++ b/basis/compiler/tests/x87-regression.factor
@@ -3,7 +3,7 @@ USING: math.floats.env alien.syntax alien.c-types compiler.test
 tools.test kernel math ;
 
 LIBRARY: libm
-FUNCTION: double sqrt ( double x ) ;
+FUNCTION: double sqrt ( double x )
 
 [ { } ] [
     4.0 [ [ 100 [ dup sqrt drop ] times ] collect-fp-exceptions nip ] compile-call

diff --git a/extra/fftw/ffi/ffi.factor b/extra/fftw/ffi/ffi.factor
index 4a390d0dfaca29327efbf21e8ca3c4f7ff41c42e..5bf73206eae6ca6476db8a278b60ed0f6b8059cb 100644 (file)
--- a/extra/fftw/ffi/ffi.factor
+++ b/extra/fftw/ffi/ffi.factor
@@ -34,10 +34,10 @@ FUNCTION: void* fftw_malloc ( size_t n )
 
 FUNCTION: fftw_plan fftw_plan_dft_1d ( int n, void* in, void* out, int sign, int flags )
 
-FUNCTION: void fftw_destroy_plan ( fftw_plan )
+FUNCTION: void fftw_destroy_plan ( fftw_plan p )
 
-FUNCTION: void fftw_execute ( fftw_plan )
+FUNCTION: void fftw_execute ( fftw_plan p )
 
-FUNCTION: void fftw_free ( void* )
+FUNCTION: void fftw_free ( void* p )
 
 DESTRUCTOR: fftw_free

diff --git a/extra/lua/lua.factor b/extra/lua/lua.factor
index b2ef325618eda7e530cca45c3e1d9186d5ee24f0..80dd7b01976f151e51f250605263ea19edcafece 100644 (file)
--- a/extra/lua/lua.factor
+++ b/extra/lua/lua.factor
@@ -107,9 +107,9 @@ FUNCTION: void lua_pushnil ( lua_State* L )
 FUNCTION: void lua_pushnumber ( lua_State* L, lua_Number n )
 FUNCTION: void lua_pushinteger ( lua_State* L, lua_Integer n )
 FUNCTION: void lua_pushlstring ( lua_State* L, char* s, size_t l )
-FUNCTION: void lua_pushstring ( lua_State* L, c-string[ascii] )
-! FUNCTION: c-string[ascii] lua_pushvfstring ( lua_State* L, c-string[ascii] fmt, va_list argp ) ;
-! FUNCTION: c-string[ascii] lua_pushfstring ( lua_State* L, c-string[ascii] fmt, ... ) ;
+FUNCTION: void lua_pushstring ( lua_State* L, c-string[ascii] s )
+! FUNCTION: c-string[ascii] lua_pushvfstring ( lua_State* L, c-string[ascii] fmt, va_list argp )
+! FUNCTION: c-string[ascii] lua_pushfstring ( lua_State* L, c-string[ascii] fmt, ... )
 FUNCTION: void lua_pushcclosure ( lua_State* L, lua_CFunction fn, int n )
 FUNCTION: void lua_pushboolean ( lua_State* L, int b )
 FUNCTION: void lua_pushlightuserdata ( lua_State* L, void* p )

diff --git a/extra/ogg/theora/theora.factor b/extra/ogg/theora/theora.factor
index 0ebd638b02e8376473f7a9e2443f109fcd9d42b7..78f6dc5939f2f7e735e337964870669d12947035 100644 (file)
--- a/extra/ogg/theora/theora.factor
+++ b/extra/ogg/theora/theora.factor
@@ -112,7 +112,7 @@ STRUCT: th-huff-code
 LIBRARY: theoradec
 FUNCTION: c-string th_version_string ( )
 FUNCTION: uint th_version_number ( )
-FUNCTION: longlong th_granule_frame ( void* encdec, longlong granpos) ;
+FUNCTION: longlong th_granule_frame ( void* encdec, longlong granpos )
 FUNCTION: int th_packet_isheader ( ogg-packet* op )
 FUNCTION: int th_packet_iskeyframe ( ogg-packet* op )
 FUNCTION: void th_info_init ( th-info* info )

diff --git a/extra/readline/ffi/ffi.factor b/extra/readline/ffi/ffi.factor
index f87f84a68eff71241dc3e2261a0ed83f8076ab69..fbbba58c7cd590c3501543951df1e86955bac925 100644 (file)
--- a/extra/readline/ffi/ffi.factor
+++ b/extra/readline/ffi/ffi.factor
@@ -322,7 +322,7 @@ FUNCTION: int rl_vi_goto_mark ( int arg1, int arg2 )
 
 FUNCTION: int rl_vi_check ( )
 FUNCTION: int rl_vi_domove ( int arg1, int* arg2 )
-FUNCTION: int rl_vi_bracktype ( int )
+FUNCTION: int rl_vi_bracktype ( int i )
 
 FUNCTION: void rl_vi_start_inserting ( int arg1, int arg2, int
                                       arg3 )
@@ -348,7 +348,7 @@ FUNCTION: int rl_add_defun ( c-string arg1, rl_command_func_t*
 FUNCTION: int rl_bind_key ( int arg1, rl_command_func_t* arg2 )
 FUNCTION: int rl_bind_key_in_map ( int arg1, rl_command_func_t*
                                   arg2, Keymap arg3 )
-FUNCTION: int rl_unbind_key ( int )
+FUNCTION: int rl_unbind_key ( int i )
 FUNCTION: int rl_unbind_key_in_map ( int arg1, Keymap arg2 )
 FUNCTION: int rl_bind_key_if_unbound ( int arg1,
                                       rl_command_func_t* arg2 )
@@ -382,8 +382,8 @@ FUNCTION: int rl_macro_bind ( c-string arg1, c-string arg2,
                              Keymap arg3 )
 FUNCTION: int rl_translate_keyseq ( c-string arg1, c-string
                                    arg2, int* arg3 )
-FUNCTION: c-string rl_untranslate_keyseq ( int s )
-FUNCTION: rl_command_func_t* rl_named_function ( c-string )
+FUNCTION: c-string rl_untranslate_keyseq ( int i )
+FUNCTION: rl_command_func_t* rl_named_function ( c-string s )
 FUNCTION: rl_command_func_t* rl_function_of_keyseq ( c-string arg1,
                                                     Keymap arg2,
                                                     int* arg3 )