diff options
| author | Gerd Moellmann <gerd@gnu.org> | 1999-11-11 11:45:06 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 1999-11-11 11:45:06 +0000 |
| commit | 339ee9797d7d80d6b934e6a335c57d39303bbdcc (patch) | |
| tree | 4ff4b35d61aa3f78d65f7de698c2a54a4cdb4508 /src/lread.c | |
| parent | 35a5514b96c8ae655e2a6995c2f0ff2a07de65ab (diff) | |
| download | emacs-339ee9797d7d80d6b934e6a335c57d39303bbdcc.tar.gz | |
Remove USE_TEXT_PROPERTIES.
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/src/lread.c b/src/lread.c index e08b4ddcdca..2874e3bc0b9 100644 --- a/src/lread.c +++ b/src/lread.c @@ -1693,7 +1693,6 @@ read1 (readcharfun, pch, first_in_list) return Fmake_byte_code (XVECTOR (tmp)->size, XVECTOR (tmp)->contents); } -#ifdef USE_TEXT_PROPERTIES if (c == '(') { Lisp_Object tmp; @@ -1726,7 +1725,7 @@ read1 (readcharfun, pch, first_in_list) UNGCPRO; return tmp; } -#endif + /* #@NUMBER is used to skip NUMBER following characters. That's used in .elc files to skip over doc strings and function definitions. */ @@ -2295,7 +2294,6 @@ substitute_object_recurse (object, placeholder, subtree) return subtree; } -#ifdef USE_TEXT_PROPERTIES case Lisp_String: { /* Check for text properties in each interval. @@ -2309,7 +2307,6 @@ substitute_object_recurse (object, placeholder, subtree) return subtree; } -#endif /* defined USE_TEXT_PROPERTIES */ /* Other types don't recurse any further. */ default: |