aboutsummaryrefslogtreecommitdiffstats
path: root/src/floatfns.c
diff options
context:
space:
mode:
authorAndreas Schwab2010-07-12 19:47:17 +0200
committerAndreas Schwab2010-07-12 19:47:17 +0200
commitd5a3eaaf13bf8de7e52a79f3c9e8c248dbb5a93e (patch)
treeeeb2e0ed5cb8f7ccb1cd41cfceb03c6aaa2897fc /src/floatfns.c
parentded80a25b7d4a088dd4c4a714666705749106138 (diff)
downloademacs-d5a3eaaf13bf8de7e52a79f3c9e8c248dbb5a93e.tar.gz
emacs-d5a3eaaf13bf8de7e52a79f3c9e8c248dbb5a93e.zip
Convert old-style definitions
* editfns.c (transpose_markers): Convert old-style definition. * emacs.c (abort, shut_down_emacs, fixup_locale) (synchronize_system_time_locale) (synchronize_system_messages_locale, syms_of_emacs): Likewise. * floatfns.c (extract_float, matherr, init_floatfns) (syms_of_floatfns): Likewise. * fns.c (make_hash_table): Likewise. * ftfont.c (ftfont_get_otf, ftfont_otf_features) (ftfont_otf_capability, ftfont_get_glyph_id, ftfont_get_metrics) (ftfont_drive_otf, ftfont_shape_by_flt, ftfont_shape) (ftfont_variation_glyphs): Likewise. * gtkutil.c (xg_create_widget, xg_modify_menubar_widgets): Likewise. * keymap.c (describe_map_tree, describe_map, describe_vector): Likewise. * lread.c (read_filtered_event): Likewise. * minibuf.c (read_minibuf_noninteractive, read_minibuf): Likewise. * process.c (wait_reading_process_output): Likewise. * scroll.c (do_line_insertion_deletion_costs): Likewise. * search.c (search_buffer, boyer_moore): Likewise. * syntax.c (scan_sexps_forward): Likewise. * xdisp.c (try_scrolling): Likewise. * xfaces.c (face_at_buffer_position, face_for_overlay_string) (face_at_string_position): Likewise. * xfns.c (x_default_scroll_bar_color_parameter): Likewise. * xselect.c (x_get_window_property, receive_incremental_selection) (x_get_window_property_as_lisp_data, lisp_data_to_selection_data): Likewise. * xterm.c (x_draw_relief_rect, x_draw_box_rect): Likewise.
Diffstat (limited to 'src/floatfns.c')
-rw-r--r--src/floatfns.c10
1 files changed, 4 insertions, 6 deletions
diff --git a/src/floatfns.c b/src/floatfns.c
index 64dc308c7dd..4c1548cfd8f 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -192,8 +192,7 @@ static char *float_error_fn_name;
192/* Extract a Lisp number as a `double', or signal an error. */ 192/* Extract a Lisp number as a `double', or signal an error. */
193 193
194double 194double
195extract_float (num) 195extract_float (Lisp_Object num)
196 Lisp_Object num;
197{ 196{
198 CHECK_NUMBER_OR_FLOAT (num); 197 CHECK_NUMBER_OR_FLOAT (num);
199 198
@@ -985,8 +984,7 @@ float_error (signo)
985 984
986#ifdef HAVE_MATHERR 985#ifdef HAVE_MATHERR
987int 986int
988matherr (x) 987matherr (struct exception *x)
989 struct exception *x;
990{ 988{
991 Lisp_Object args; 989 Lisp_Object args;
992 if (! in_float) 990 if (! in_float)
@@ -1014,7 +1012,7 @@ matherr (x)
1014#endif /* HAVE_MATHERR */ 1012#endif /* HAVE_MATHERR */
1015 1013
1016void 1014void
1017init_floatfns () 1015init_floatfns (void)
1018{ 1016{
1019#ifdef FLOAT_CATCH_SIGILL 1017#ifdef FLOAT_CATCH_SIGILL
1020 signal (SIGILL, float_error); 1018 signal (SIGILL, float_error);
@@ -1023,7 +1021,7 @@ init_floatfns ()
1023} 1021}
1024 1022
1025void 1023void
1026syms_of_floatfns () 1024syms_of_floatfns (void)
1027{ 1025{
1028 defsubr (&Sacos); 1026 defsubr (&Sacos);
1029 defsubr (&Sasin); 1027 defsubr (&Sasin);