summaryrefslogtreecommitdiff
path: root/src/syntax.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1992-01-13 21:48:08 +0000
committerJim Blandy <jimb@redhat.com>1992-01-13 21:48:08 +0000
commit265a9e559da4ac72d154ecd638c51801b3e97847 (patch)
tree633e4dc50761c2cd5201a7874e23eee9e51aecea /src/syntax.c
parentd427b66a664c0e1ffc818dfa5b87b45b4857d2ae (diff)
downloademacs-265a9e559da4ac72d154ecd638c51801b3e97847.tar.gz
emacs-265a9e559da4ac72d154ecd638c51801b3e97847.tar.bz2
emacs-265a9e559da4ac72d154ecd638c51801b3e97847.zip
*** empty log message ***
Diffstat (limited to 'src/syntax.c')
-rw-r--r--src/syntax.c22
1 files changed, 11 insertions, 11 deletions
diff --git a/src/syntax.c b/src/syntax.c
index f90ed5cf8f0..4f203caf8f8 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -46,7 +46,7 @@ check_syntax_table (obj)
{
register Lisp_Object tem;
while (tem = Fsyntax_table_p (obj),
- NULL (tem))
+ NILP (tem))
obj = wrong_type_argument (Qsyntax_table_p, obj, 0);
return obj;
}
@@ -79,9 +79,9 @@ It is a copy of the TABLE, which defaults to the standard syntax table.")
XFASTINT (size) = 0400;
XFASTINT (val) = 0;
val = Fmake_vector (size, val);
- if (!NULL (table))
+ if (!NILP (table))
table = check_syntax_table (table);
- else if (NULL (Vstandard_syntax_table))
+ else if (NILP (Vstandard_syntax_table))
/* Can only be null during initialization */
return val;
else table = Vstandard_syntax_table;
@@ -195,7 +195,7 @@ DEFUN ("modify-syntax-entry", Fmodify_syntax_entry, Smodify_syntax_entry, 2, 3,
CHECK_NUMBER (c, 0);
CHECK_STRING (newentry, 1);
- if (NULL (syntax_table))
+ if (NILP (syntax_table))
syntax_table = current_buffer->syntax_table;
else
syntax_table = check_syntax_table (syntax_table);
@@ -899,7 +899,7 @@ scan_sexps_forward (from, end, targetdepth, stopbefore, oldstate)
immediate_quit = 1;
QUIT;
- if (NULL (oldstate))
+ if (NILP (oldstate))
{
depth = 0;
state.instring = -1;
@@ -908,7 +908,7 @@ scan_sexps_forward (from, end, targetdepth, stopbefore, oldstate)
else
{
tem = Fcar (oldstate);
- if (!NULL (tem))
+ if (!NILP (tem))
depth = XINT (tem);
else
depth = 0;
@@ -917,15 +917,15 @@ scan_sexps_forward (from, end, targetdepth, stopbefore, oldstate)
oldstate = Fcdr (oldstate);
oldstate = Fcdr (oldstate);
tem = Fcar (oldstate);
- state.instring = !NULL (tem) ? XINT (tem) : -1;
+ state.instring = !NILP (tem) ? XINT (tem) : -1;
oldstate = Fcdr (oldstate);
tem = Fcar (oldstate);
- state.incomment = !NULL (tem);
+ state.incomment = !NILP (tem);
oldstate = Fcdr (oldstate);
tem = Fcar (oldstate);
- start_quoted = !NULL (tem);
+ start_quoted = !NILP (tem);
}
state.quoted = 0;
mindepth = depth;
@@ -1125,7 +1125,7 @@ DEFUN ("parse-partial-sexp", Fparse_partial_sexp, Sparse_partial_sexp, 2, 5, 0,
struct lisp_parse_state state;
int target;
- if (!NULL (targetdepth))
+ if (!NILP (targetdepth))
{
CHECK_NUMBER (targetdepth, 3);
target = XINT (targetdepth);
@@ -1135,7 +1135,7 @@ DEFUN ("parse-partial-sexp", Fparse_partial_sexp, Sparse_partial_sexp, 2, 5, 0,
validate_region (&from, &to);
state = *scan_sexps_forward (XINT (from), XINT (to),
- target, !NULL (stopbefore), oldstate);
+ target, !NILP (stopbefore), oldstate);
SET_PT (state.location);