Mercurial > emacs
comparison src/alloc.c @ 16101:039e96495054
(Fmake_byte_code): Call make_pure_vector using nargs.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 04 Sep 1996 00:06:48 +0000 |
| parents | ccd19852de65 |
| children | bab3f12493b6 |
comparison
equal
deleted
inserted
replaced
| 16100:ccd19852de65 | 16101:039e96495054 |
|---|---|
| 822 register int index; | 822 register int index; |
| 823 register struct Lisp_Vector *p; | 823 register struct Lisp_Vector *p; |
| 824 | 824 |
| 825 XSETFASTINT (len, nargs); | 825 XSETFASTINT (len, nargs); |
| 826 if (!NILP (Vpurify_flag)) | 826 if (!NILP (Vpurify_flag)) |
| 827 val = make_pure_vector (XFASTINT (len)); | 827 val = make_pure_vector ((EMACS_INT) nargs); |
| 828 else | 828 else |
| 829 val = Fmake_vector (len, Qnil); | 829 val = Fmake_vector (len, Qnil); |
| 830 p = XVECTOR (val); | 830 p = XVECTOR (val); |
| 831 for (index = 0; index < nargs; index++) | 831 for (index = 0; index < nargs; index++) |
| 832 { | 832 { |