[Emacs-diffs] Changes to emacs/src/callint.c

[Juanma Barranquero]

Index: emacs/src/callint.c
diff -c emacs/src/callint.c:1.121 emacs/src/callint.c:1.122
*** emacs/src/callint.c:1.121   Mon Dec  2 18:30:54 2002
--- emacs/src/callint.c Tue Feb  4 09:03:11 2003
***************
*** 743,749 ****
              args[i] = Qnil;
              varies[i] = -1;
            }
!         else 
            {
              args[i]
                = Fread_non_nil_coding_system (build_string (callint_message));
--- 743,749 ----
              args[i] = Qnil;
              varies[i] = -1;
            }
!         else
            {
              args[i]
                = Fread_non_nil_coding_system (build_string (callint_message));
***************
*** 820,826 ****
      UNGCPRO;
      return unbind_to (speccount, val);
    }
! }  
  
  DEFUN ("prefix-numeric-value", Fprefix_numeric_value, Sprefix_numeric_value,
         1, 1, 0,
--- 820,826 ----
      UNGCPRO;
      return unbind_to (speccount, val);
    }
! }
  
  DEFUN ("prefix-numeric-value", Fprefix_numeric_value, Sprefix_numeric_value,
         1, 1, 0,
***************
*** 831,837 ****
       Lisp_Object raw;
  {
    Lisp_Object val;
!   
    if (NILP (raw))
      XSETFASTINT (val, 1);
    else if (EQ (raw, Qminus))
--- 831,837 ----
       Lisp_Object raw;
  {
    Lisp_Object val;
! 
    if (NILP (raw))
      XSETFASTINT (val, 1);
    else if (EQ (raw, Qminus))