diff options
author | Gerd Moellmann <gerd@gnu.org> | 2000-09-21 20:54:57 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2000-09-21 20:54:57 +0000 |
commit | 6bbd7a29592594e23e5cb98467e608f10b00f877 (patch) | |
tree | 1e60389bc0f5c349fc0a39b2609b1a60b084e133 /src/data.c | |
parent | 8179cccd88a3f114b0e4891c033ecd302dfb094e (diff) | |
download | emacs-6bbd7a29592594e23e5cb98467e608f10b00f877.tar.gz |
Avoid some more compiler warnings.
Diffstat (limited to 'src/data.c')
-rw-r--r-- | src/data.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c index 0e393bf450d..c85e5485d69 100644 --- a/src/data.c +++ b/src/data.c @@ -1751,6 +1751,8 @@ or a byte-code object. IDX starts at 0.") { Lisp_Object val; + val = Qnil; + if (idxval < 0) args_out_of_range (array, idx); if (idxval < CHAR_TABLE_ORDINARY_SLOTS) @@ -1821,7 +1823,7 @@ or a byte-code object. IDX starts at 0.") } else { - int size; + int size = 0; if (VECTORP (array)) size = XVECTOR (array)->size; else if (COMPILEDP (array)) @@ -2010,7 +2012,7 @@ arithcompare (num1, num2, comparison) Lisp_Object num1, num2; enum comparison comparison; { - double f1, f2; + double f1 = 0, f2 = 0; int floatp = 0; CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (num1, 0); |