(Fml_if): Initialize val.

1998-04-17 01:49:33 +00:00
parent ad21fa0789
commit 00df1bdfb3
1 changed files with 1 additions and 0 deletions
--- a/src/mocklisp.c
+++ b/src/mocklisp.c
@@ -50,6 +50,7 @@ DEFUN ("ml-if", Fml_if, Sml_if, 0, UNEVALLED, 0, "Mocklisp version of `if'.")
  register Lisp_Object val;
  struct gcpro gcpro1;

+  val = Qnil;
  GCPRO1 (args);
  while (!NILP (args))
    {