Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
8e86942b
Commit
8e86942b
authored
Mar 22, 1994
by
Richard M. Stallman
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(Qwholenump): New variable.
(syms_of_data): Set and gcpro Qwholenump.
parent
07a97bf8
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
5 additions
and
1 deletion
+5
-1
src/data.c
src/data.c
+5
-1
No files found.
src/data.c
View file @
8e86942b
...
...
@@ -71,7 +71,7 @@ Lisp_Object Qsetting_constant, Qinvalid_read_syntax;
Lisp_Object
Qinvalid_function
,
Qwrong_number_of_arguments
,
Qno_catch
;
Lisp_Object
Qend_of_file
,
Qarith_error
,
Qmark_inactive
;
Lisp_Object
Qbeginning_of_buffer
,
Qend_of_buffer
,
Qbuffer_read_only
;
Lisp_Object
Qintegerp
,
Qnatnump
,
Qsymbolp
,
Qlistp
,
Qconsp
;
Lisp_Object
Qintegerp
,
Qnatnump
,
Qwholenump
,
Qsymbolp
,
Qlistp
,
Qconsp
;
Lisp_Object
Qstringp
,
Qarrayp
,
Qsequencep
,
Qbufferp
;
Lisp_Object
Qchar_or_string_p
,
Qmarkerp
,
Qinteger_or_marker_p
,
Qvectorp
;
Lisp_Object
Qbuffer_or_string_p
;
...
...
@@ -2021,6 +2021,7 @@ syms_of_data ()
Qsymbolp
=
intern
(
"symbolp"
);
Qintegerp
=
intern
(
"integerp"
);
Qnatnump
=
intern
(
"natnump"
);
Qwholenump
=
intern
(
"wholenump"
);
Qstringp
=
intern
(
"stringp"
);
Qarrayp
=
intern
(
"arrayp"
);
Qsequencep
=
intern
(
"sequencep"
);
...
...
@@ -2204,6 +2205,7 @@ syms_of_data ()
staticpro
(
&
Qsymbolp
);
staticpro
(
&
Qintegerp
);
staticpro
(
&
Qnatnump
);
staticpro
(
&
Qwholenump
);
staticpro
(
&
Qstringp
);
staticpro
(
&
Qarrayp
);
staticpro
(
&
Qsequencep
);
...
...
@@ -2301,6 +2303,8 @@ syms_of_data ()
defsubr
(
&
Sadd1
);
defsubr
(
&
Ssub1
);
defsubr
(
&
Slognot
);
Fset
(
Qwholenump
,
Qnatnump
);
}
SIGTYPE
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment