aboutsummaryrefslogtreecommitdiffstats
path: root/src/bytecode.c
diff options
context:
space:
mode:
authorJoseph Arceneaux1992-08-06 03:25:57 +0000
committerJoseph Arceneaux1992-08-06 03:25:57 +0000
commit921a89355edf5019b6036f49179905a1f085bf70 (patch)
tree1c0b34663aecc7084224b8a7733d511affc0b4d1 /src/bytecode.c
parente6d38bed7ea3c8dfda5dde0941acd38fed2caaa0 (diff)
downloademacs-921a89355edf5019b6036f49179905a1f085bf70.tar.gz
emacs-921a89355edf5019b6036f49179905a1f085bf70.zip
Replaced NULL with N
Diffstat (limited to 'src/bytecode.c')
-rw-r--r--src/bytecode.c20
1 files changed, 10 insertions, 10 deletions
diff --git a/src/bytecode.c b/src/bytecode.c
index f888a68b7f6..7604dd82655 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1,5 +1,5 @@
1/* Execution of byte code produced by bytecomp.el. 1/* Execution of byte code produced by bytecomp.el.
2 Copyright (C) 1985, 1986, 1987, 1988 Free Software Foundation, Inc. 2 Copyright (C) 1985, 1986, 1987, 1988, 1992 Free Software Foundation, Inc.
3 3
4This file is part of GNU Emacs. 4This file is part of GNU Emacs.
5 5
@@ -424,7 +424,7 @@ If the third argument is incorrect, Emacs may crash.")
424 424
425 case Bgotoifnil: 425 case Bgotoifnil:
426 op = FETCH2; 426 op = FETCH2;
427 if (NULL (POP)) 427 if (NILP (POP))
428 { 428 {
429 QUIT; 429 QUIT;
430 pc = XSTRING (string_saved)->data + op; 430 pc = XSTRING (string_saved)->data + op;
@@ -433,7 +433,7 @@ If the third argument is incorrect, Emacs may crash.")
433 433
434 case Bgotoifnonnil: 434 case Bgotoifnonnil:
435 op = FETCH2; 435 op = FETCH2;
436 if (!NULL (POP)) 436 if (!NILP (POP))
437 { 437 {
438 QUIT; 438 QUIT;
439 pc = XSTRING (string_saved)->data + op; 439 pc = XSTRING (string_saved)->data + op;
@@ -442,7 +442,7 @@ If the third argument is incorrect, Emacs may crash.")
442 442
443 case Bgotoifnilelsepop: 443 case Bgotoifnilelsepop:
444 op = FETCH2; 444 op = FETCH2;
445 if (NULL (TOP)) 445 if (NILP (TOP))
446 { 446 {
447 QUIT; 447 QUIT;
448 pc = XSTRING (string_saved)->data + op; 448 pc = XSTRING (string_saved)->data + op;
@@ -452,7 +452,7 @@ If the third argument is incorrect, Emacs may crash.")
452 452
453 case Bgotoifnonnilelsepop: 453 case Bgotoifnonnilelsepop:
454 op = FETCH2; 454 op = FETCH2;
455 if (!NULL (TOP)) 455 if (!NILP (TOP))
456 { 456 {
457 QUIT; 457 QUIT;
458 pc = XSTRING (string_saved)->data + op; 458 pc = XSTRING (string_saved)->data + op;
@@ -529,7 +529,7 @@ If the third argument is incorrect, Emacs may crash.")
529 { 529 {
530 if (CONSP (v1)) 530 if (CONSP (v1))
531 v1 = XCONS (v1)->cdr; 531 v1 = XCONS (v1)->cdr;
532 else if (!NULL (v1)) 532 else if (!NILP (v1))
533 { 533 {
534 immediate_quit = 0; 534 immediate_quit = 0;
535 v1 = wrong_type_argument (Qlistp, v1); 535 v1 = wrong_type_argument (Qlistp, v1);
@@ -553,7 +553,7 @@ If the third argument is incorrect, Emacs may crash.")
553 break; 553 break;
554 554
555 case Blistp: 555 case Blistp:
556 TOP = CONSP (TOP) || NULL (TOP) ? Qt : Qnil; 556 TOP = CONSP (TOP) || NILP (TOP) ? Qt : Qnil;
557 break; 557 break;
558 558
559 case Beq: 559 case Beq:
@@ -567,21 +567,21 @@ If the third argument is incorrect, Emacs may crash.")
567 break; 567 break;
568 568
569 case Bnot: 569 case Bnot:
570 TOP = NULL (TOP) ? Qt : Qnil; 570 TOP = NILP (TOP) ? Qt : Qnil;
571 break; 571 break;
572 572
573 case Bcar: 573 case Bcar:
574 v1 = TOP; 574 v1 = TOP;
575 docar: 575 docar:
576 if (CONSP (v1)) TOP = XCONS (v1)->car; 576 if (CONSP (v1)) TOP = XCONS (v1)->car;
577 else if (NULL (v1)) TOP = Qnil; 577 else if (NILP (v1)) TOP = Qnil;
578 else Fcar (wrong_type_argument (Qlistp, v1)); 578 else Fcar (wrong_type_argument (Qlistp, v1));
579 break; 579 break;
580 580
581 case Bcdr: 581 case Bcdr:
582 v1 = TOP; 582 v1 = TOP;
583 if (CONSP (v1)) TOP = XCONS (v1)->cdr; 583 if (CONSP (v1)) TOP = XCONS (v1)->cdr;
584 else if (NULL (v1)) TOP = Qnil; 584 else if (NILP (v1)) TOP = Qnil;
585 else Fcdr (wrong_type_argument (Qlistp, v1)); 585 else Fcdr (wrong_type_argument (Qlistp, v1));
586 break; 586 break;
587 587