diff options
| author | Dave Love | 2002-09-05 16:59:54 +0000 |
|---|---|---|
| committer | Dave Love | 2002-09-05 16:59:54 +0000 |
| commit | b11a4ed7f7d5a52a79649b3d9fd5b442ecc0a759 (patch) | |
| tree | 8b37996afa869a1a735dd1c8b74e96a580d6fd8e /src | |
| parent | cbc3a17a173a6f858619e9791a1787dce965410e (diff) | |
| download | emacs-b11a4ed7f7d5a52a79649b3d9fd5b442ecc0a759.tar.gz emacs-b11a4ed7f7d5a52a79649b3d9fd5b442ecc0a759.zip | |
(fontset_add): Return Lisp_Object.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fontset.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/fontset.c b/src/fontset.c index b6246439999..5b283e7c000 100644 --- a/src/fontset.c +++ b/src/fontset.c | |||
| @@ -229,8 +229,8 @@ void (*check_window_system_func) P_ ((void)); | |||
| 229 | 229 | ||
| 230 | 230 | ||
| 231 | /* Prototype declarations for static functions. */ | 231 | /* Prototype declarations for static functions. */ |
| 232 | static int fontset_add P_ ((Lisp_Object, Lisp_Object, Lisp_Object, | 232 | static Lisp_Object fontset_add P_ ((Lisp_Object, Lisp_Object, Lisp_Object, |
| 233 | Lisp_Object)); | 233 | Lisp_Object)); |
| 234 | static Lisp_Object make_fontset P_ ((Lisp_Object, Lisp_Object, Lisp_Object)); | 234 | static Lisp_Object make_fontset P_ ((Lisp_Object, Lisp_Object, Lisp_Object)); |
| 235 | static Lisp_Object fontset_pattern_regexp P_ ((Lisp_Object)); | 235 | static Lisp_Object fontset_pattern_regexp P_ ((Lisp_Object)); |
| 236 | static void accumulate_script_ranges P_ ((Lisp_Object, Lisp_Object, | 236 | static void accumulate_script_ranges P_ ((Lisp_Object, Lisp_Object, |
| @@ -355,7 +355,7 @@ fontset_ref_and_range (fontset, c, from, to) | |||
| 355 | Fmake_vector (make_number (1), (elt))) \ | 355 | Fmake_vector (make_number (1), (elt))) \ |
| 356 | : fontset_add ((fontset), (range), (elt), (add))) | 356 | : fontset_add ((fontset), (range), (elt), (add))) |
| 357 | 357 | ||
| 358 | static int | 358 | static Lisp_Object |
| 359 | fontset_add (fontset, range, elt, add) | 359 | fontset_add (fontset, range, elt, add) |
| 360 | Lisp_Object fontset, range, elt, add; | 360 | Lisp_Object fontset, range, elt, add; |
| 361 | { | 361 | { |
| @@ -383,7 +383,7 @@ fontset_add (fontset, range, elt, add) | |||
| 383 | char_table_set_range (fontset, from, to1, elt1); | 383 | char_table_set_range (fontset, from, to1, elt1); |
| 384 | from = to1 + 1; | 384 | from = to1 + 1; |
| 385 | } while (from < to); | 385 | } while (from < to); |
| 386 | return 0; | 386 | return Qnil; |
| 387 | } | 387 | } |
| 388 | 388 | ||
| 389 | 389 | ||