diff options
| author | Jim Blandy | 1992-01-13 21:48:08 +0000 |
|---|---|---|
| committer | Jim Blandy | 1992-01-13 21:48:08 +0000 |
| commit | 265a9e559da4ac72d154ecd638c51801b3e97847 (patch) | |
| tree | 633e4dc50761c2cd5201a7874e23eee9e51aecea /src/syntax.c | |
| parent | d427b66a664c0e1ffc818dfa5b87b45b4857d2ae (diff) | |
| download | emacs-265a9e559da4ac72d154ecd638c51801b3e97847.tar.gz emacs-265a9e559da4ac72d154ecd638c51801b3e97847.zip | |
*** empty log message ***
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 22 |
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) | |||
| 46 | { | 46 | { |
| 47 | register Lisp_Object tem; | 47 | register Lisp_Object tem; |
| 48 | while (tem = Fsyntax_table_p (obj), | 48 | while (tem = Fsyntax_table_p (obj), |
| 49 | NULL (tem)) | 49 | NILP (tem)) |
| 50 | obj = wrong_type_argument (Qsyntax_table_p, obj, 0); | 50 | obj = wrong_type_argument (Qsyntax_table_p, obj, 0); |
| 51 | return obj; | 51 | return obj; |
| 52 | } | 52 | } |
| @@ -79,9 +79,9 @@ It is a copy of the TABLE, which defaults to the standard syntax table.") | |||
| 79 | XFASTINT (size) = 0400; | 79 | XFASTINT (size) = 0400; |
| 80 | XFASTINT (val) = 0; | 80 | XFASTINT (val) = 0; |
| 81 | val = Fmake_vector (size, val); | 81 | val = Fmake_vector (size, val); |
| 82 | if (!NULL (table)) | 82 | if (!NILP (table)) |
| 83 | table = check_syntax_table (table); | 83 | table = check_syntax_table (table); |
| 84 | else if (NULL (Vstandard_syntax_table)) | 84 | else if (NILP (Vstandard_syntax_table)) |
| 85 | /* Can only be null during initialization */ | 85 | /* Can only be null during initialization */ |
| 86 | return val; | 86 | return val; |
| 87 | else table = Vstandard_syntax_table; | 87 | else table = Vstandard_syntax_table; |
| @@ -195,7 +195,7 @@ DEFUN ("modify-syntax-entry", Fmodify_syntax_entry, Smodify_syntax_entry, 2, 3, | |||
| 195 | 195 | ||
| 196 | CHECK_NUMBER (c, 0); | 196 | CHECK_NUMBER (c, 0); |
| 197 | CHECK_STRING (newentry, 1); | 197 | CHECK_STRING (newentry, 1); |
| 198 | if (NULL (syntax_table)) | 198 | if (NILP (syntax_table)) |
| 199 | syntax_table = current_buffer->syntax_table; | 199 | syntax_table = current_buffer->syntax_table; |
| 200 | else | 200 | else |
| 201 | syntax_table = check_syntax_table (syntax_table); | 201 | syntax_table = check_syntax_table (syntax_table); |
| @@ -899,7 +899,7 @@ scan_sexps_forward (from, end, targetdepth, stopbefore, oldstate) | |||
| 899 | immediate_quit = 1; | 899 | immediate_quit = 1; |
| 900 | QUIT; | 900 | QUIT; |
| 901 | 901 | ||
| 902 | if (NULL (oldstate)) | 902 | if (NILP (oldstate)) |
| 903 | { | 903 | { |
| 904 | depth = 0; | 904 | depth = 0; |
| 905 | state.instring = -1; | 905 | state.instring = -1; |
| @@ -908,7 +908,7 @@ scan_sexps_forward (from, end, targetdepth, stopbefore, oldstate) | |||
| 908 | else | 908 | else |
| 909 | { | 909 | { |
| 910 | tem = Fcar (oldstate); | 910 | tem = Fcar (oldstate); |
| 911 | if (!NULL (tem)) | 911 | if (!NILP (tem)) |
| 912 | depth = XINT (tem); | 912 | depth = XINT (tem); |
| 913 | else | 913 | else |
| 914 | depth = 0; | 914 | depth = 0; |
| @@ -917,15 +917,15 @@ scan_sexps_forward (from, end, targetdepth, stopbefore, oldstate) | |||
| 917 | oldstate = Fcdr (oldstate); | 917 | oldstate = Fcdr (oldstate); |
| 918 | oldstate = Fcdr (oldstate); | 918 | oldstate = Fcdr (oldstate); |
| 919 | tem = Fcar (oldstate); | 919 | tem = Fcar (oldstate); |
| 920 | state.instring = !NULL (tem) ? XINT (tem) : -1; | 920 | state.instring = !NILP (tem) ? XINT (tem) : -1; |
| 921 | 921 | ||
| 922 | oldstate = Fcdr (oldstate); | 922 | oldstate = Fcdr (oldstate); |
| 923 | tem = Fcar (oldstate); | 923 | tem = Fcar (oldstate); |
| 924 | state.incomment = !NULL (tem); | 924 | state.incomment = !NILP (tem); |
| 925 | 925 | ||
| 926 | oldstate = Fcdr (oldstate); | 926 | oldstate = Fcdr (oldstate); |
| 927 | tem = Fcar (oldstate); | 927 | tem = Fcar (oldstate); |
| 928 | start_quoted = !NULL (tem); | 928 | start_quoted = !NILP (tem); |
| 929 | } | 929 | } |
| 930 | state.quoted = 0; | 930 | state.quoted = 0; |
| 931 | mindepth = depth; | 931 | mindepth = depth; |
| @@ -1125,7 +1125,7 @@ DEFUN ("parse-partial-sexp", Fparse_partial_sexp, Sparse_partial_sexp, 2, 5, 0, | |||
| 1125 | struct lisp_parse_state state; | 1125 | struct lisp_parse_state state; |
| 1126 | int target; | 1126 | int target; |
| 1127 | 1127 | ||
| 1128 | if (!NULL (targetdepth)) | 1128 | if (!NILP (targetdepth)) |
| 1129 | { | 1129 | { |
| 1130 | CHECK_NUMBER (targetdepth, 3); | 1130 | CHECK_NUMBER (targetdepth, 3); |
| 1131 | target = XINT (targetdepth); | 1131 | target = XINT (targetdepth); |
| @@ -1135,7 +1135,7 @@ DEFUN ("parse-partial-sexp", Fparse_partial_sexp, Sparse_partial_sexp, 2, 5, 0, | |||
| 1135 | 1135 | ||
| 1136 | validate_region (&from, &to); | 1136 | validate_region (&from, &to); |
| 1137 | state = *scan_sexps_forward (XINT (from), XINT (to), | 1137 | state = *scan_sexps_forward (XINT (from), XINT (to), |
| 1138 | target, !NULL (stopbefore), oldstate); | 1138 | target, !NILP (stopbefore), oldstate); |
| 1139 | 1139 | ||
| 1140 | SET_PT (state.location); | 1140 | SET_PT (state.location); |
| 1141 | 1141 | ||