diff options
| author | Stefan Kangas | 2024-12-16 00:01:43 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2024-12-16 00:05:06 +0100 |
| commit | bef0d80be88906b66dec06970d7782f0f7b219c0 (patch) | |
| tree | 835c2e43f7e6b7524b8effd6890f1a0ab4ba5f5f /src/json.c | |
| parent | 465544eb556777f16415c10e7607f7b72ec5a2b5 (diff) | |
| download | emacs-bef0d80be88906b66dec06970d7782f0f7b219c0.tar.gz emacs-bef0d80be88906b66dec06970d7782f0f7b219c0.zip | |
Move pure+side-effect-free declarations to byte-opt.el
* src/json.c (syms_of_json): Move pure and side-effect-free declarations
for json-serialize and json-parse-string from here...
* lisp/emacs-lisp/byte-opt.el (side-effect-free-fns, pure-fns):
...to here.
Diffstat (limited to 'src/json.c')
| -rw-r--r-- | src/json.c | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/src/json.c b/src/json.c index 282dca6e8ff..3368c52ef2a 100644 --- a/src/json.c +++ b/src/json.c | |||
| @@ -1818,16 +1818,6 @@ syms_of_json (void) | |||
| 1818 | define_error (Qjson_escape_sequence_error, | 1818 | define_error (Qjson_escape_sequence_error, |
| 1819 | "invalid escape sequence", Qjson_parse_error); | 1819 | "invalid escape sequence", Qjson_parse_error); |
| 1820 | 1820 | ||
| 1821 | DEFSYM (Qpure, "pure"); | ||
| 1822 | DEFSYM (Qside_effect_free, "side-effect-free"); | ||
| 1823 | |||
| 1824 | DEFSYM (Qjson_serialize, "json-serialize"); | ||
| 1825 | DEFSYM (Qjson_parse_string, "json-parse-string"); | ||
| 1826 | Fput (Qjson_serialize, Qpure, Qt); | ||
| 1827 | Fput (Qjson_serialize, Qside_effect_free, Qt); | ||
| 1828 | Fput (Qjson_parse_string, Qpure, Qt); | ||
| 1829 | Fput (Qjson_parse_string, Qside_effect_free, Qt); | ||
| 1830 | |||
| 1831 | DEFSYM (QCobject_type, ":object-type"); | 1821 | DEFSYM (QCobject_type, ":object-type"); |
| 1832 | DEFSYM (QCarray_type, ":array-type"); | 1822 | DEFSYM (QCarray_type, ":array-type"); |
| 1833 | DEFSYM (QCnull_object, ":null-object"); | 1823 | DEFSYM (QCnull_object, ":null-object"); |