diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-07-04 20:44:52 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-07-04 20:44:52 +0000 |
| commit | 2e34157cd9e74150e79e0ce23236252b47fb5f1a (patch) | |
| tree | 418451da8380ec73d5d46dc648c07e6ad8af845f /src/fns.c | |
| parent | 8c239ac3ed4f636810bc08959e1318b1a6e928ba (diff) | |
| download | emacs-2e34157cd9e74150e79e0ce23236252b47fb5f1a.tar.gz | |
Fix bugs with inappropriate mixing of Lisp_Object with int.
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/fns.c b/src/fns.c index 473f9ed17d6..6da0d354b5b 100644 --- a/src/fns.c +++ b/src/fns.c @@ -584,7 +584,7 @@ This function allows vectors as well as strings.") size = XVECTOR (string)->size; if (NILP (to)) - to = size; + XSETINT (to, size); else CHECK_NUMBER (to, 2); @@ -1185,6 +1185,8 @@ internal_equal (o1, o2, depth) return 0; } +extern Lisp_Object Fmake_char_internal (); + DEFUN ("fillarray", Ffillarray, Sfillarray, 2, 2, 0, "Store each element of ARRAY with ITEM.\n\ ARRAY is a vector, string, char-table, or bool-vector.") |