Mercurial > emacs

changeset 944:6bebb86e63c2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replaced NULL with N
author Joseph Arceneaux <jla@gnu.org>
date Thu, 06 Aug 1992 03:25:57 +0000
parents e95ecc378efa
children 758218342a39
files src/bytecode.c
diffstat 1 files changed, 10 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/src/bytecode.c	Thu Aug 06 03:25:23 1992 +0000
+++ b/src/bytecode.c	Thu Aug 06 03:25:57 1992 +0000
@@ -1,5 +1,5 @@
 /* Execution of byte code produced by bytecomp.el.
-   Copyright (C) 1985, 1986, 1987, 1988 Free Software Foundation, Inc.
+   Copyright (C) 1985, 1986, 1987, 1988, 1992 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -424,7 +424,7 @@
 
 	case Bgotoifnil:
 	  op = FETCH2;
-	  if (NULL (POP))
+	  if (NILP (POP))
 	    {
 	      QUIT;
 	      pc = XSTRING (string_saved)->data + op;
@@ -433,7 +433,7 @@
 
 	case Bgotoifnonnil:
 	  op = FETCH2;
-	  if (!NULL (POP))
+	  if (!NILP (POP))
 	    {
 	      QUIT;
 	      pc = XSTRING (string_saved)->data + op;
@@ -442,7 +442,7 @@
 
 	case Bgotoifnilelsepop:
 	  op = FETCH2;
-	  if (NULL (TOP))
+	  if (NILP (TOP))
 	    {
 	      QUIT;
 	      pc = XSTRING (string_saved)->data + op;
@@ -452,7 +452,7 @@
 
 	case Bgotoifnonnilelsepop:
 	  op = FETCH2;
-	  if (!NULL (TOP))
+	  if (!NILP (TOP))
 	    {
 	      QUIT;
 	      pc = XSTRING (string_saved)->data + op;
@@ -529,7 +529,7 @@
 	    {
 	      if (CONSP (v1))
 		v1 = XCONS (v1)->cdr;
-	      else if (!NULL (v1))
+	      else if (!NILP (v1))
 		{
 		  immediate_quit = 0;
 		  v1 = wrong_type_argument (Qlistp, v1);
@@ -553,7 +553,7 @@
 	  break;
 
 	case Blistp:
-	  TOP = CONSP (TOP) || NULL (TOP) ? Qt : Qnil;
+	  TOP = CONSP (TOP) || NILP (TOP) ? Qt : Qnil;
 	  break;
 
 	case Beq:
@@ -567,21 +567,21 @@
 	  break;
 
 	case Bnot:
-	  TOP = NULL (TOP) ? Qt : Qnil;
+	  TOP = NILP (TOP) ? Qt : Qnil;
 	  break;
 
 	case Bcar:
 	  v1 = TOP;
 	docar:
 	  if (CONSP (v1)) TOP = XCONS (v1)->car;
-	  else if (NULL (v1)) TOP = Qnil;
+	  else if (NILP (v1)) TOP = Qnil;
 	  else Fcar (wrong_type_argument (Qlistp, v1));
 	  break;
 
 	case Bcdr:
 	  v1 = TOP;
 	  if (CONSP (v1)) TOP = XCONS (v1)->cdr;
-	  else if (NULL (v1)) TOP = Qnil;
+	  else if (NILP (v1)) TOP = Qnil;
 	  else Fcdr (wrong_type_argument (Qlistp, v1));
 	  break;