factor: more function messups
parent
6e46c08b7e
commit
b3e8ecf738
|
@ -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
|
||||
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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 )
|
||||
|
|
|
@ -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 )
|
||||
|
|
|
@ -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 )
|
||||
|
|
Loading…
Reference in New Issue