comparison src/floatfns.c @ 21514:fa9ff387d260

Fix -Wimplicit warnings.
author Andreas Schwab <schwab@suse.de>
date Tue, 14 Apr 1998 12:25:56 +0000
parents 923e1f635ace
children a14111a2a100
comparison
equal deleted inserted replaced
21513:984881b316fc 21514:fa9ff387d260
1008 } 1008 }
1009 return (1); /* don't set errno or print a message */ 1009 return (1); /* don't set errno or print a message */
1010 } 1010 }
1011 #endif /* HAVE_MATHERR */ 1011 #endif /* HAVE_MATHERR */
1012 1012
1013 void
1013 init_floatfns () 1014 init_floatfns ()
1014 { 1015 {
1015 #ifdef FLOAT_CATCH_SIGILL 1016 #ifdef FLOAT_CATCH_SIGILL
1016 signal (SIGILL, float_error); 1017 signal (SIGILL, float_error);
1017 #endif 1018 #endif
1023 init_floatfns () 1024 init_floatfns ()
1024 {} 1025 {}
1025 1026
1026 #endif /* not LISP_FLOAT_TYPE */ 1027 #endif /* not LISP_FLOAT_TYPE */
1027 1028
1029 void
1028 syms_of_floatfns () 1030 syms_of_floatfns ()
1029 { 1031 {
1030 #ifdef LISP_FLOAT_TYPE 1032 #ifdef LISP_FLOAT_TYPE
1031 defsubr (&Sacos); 1033 defsubr (&Sacos);
1032 defsubr (&Sasin); 1034 defsubr (&Sasin);