diff options
| author | Eli Zaretskii | 2024-11-18 20:54:15 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2024-11-18 20:54:15 +0200 |
| commit | 9c484d510121e0d545f952bc016586ead61d3f10 (patch) | |
| tree | 389cf6656205c0dda85c845c7731d392c669991e | |
| parent | 8dc9dfdc381f5b75594572bfb3bbfb5126bc4a88 (diff) | |
| download | emacs-9c484d510121e0d545f952bc016586ead61d3f10.tar.gz emacs-9c484d510121e0d545f952bc016586ead61d3f10.zip | |
; Avoid assertion violations in "temacs -Q"
* src/lread.c (build_load_history): Use Fequal to compare strings.
| -rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index 854aaa784ad..c4d8d706872 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -2313,7 +2313,7 @@ build_load_history (Lisp_Object filename, bool entire) | |||
| 2313 | if (entire || !foundit) | 2313 | if (entire || !foundit) |
| 2314 | { | 2314 | { |
| 2315 | Lisp_Object tem = Fnreverse (Vcurrent_load_list); | 2315 | Lisp_Object tem = Fnreverse (Vcurrent_load_list); |
| 2316 | eassert (EQ (filename, Fcar (tem))); | 2316 | eassert (!NILP (Fequal (filename, Fcar (tem)))); |
| 2317 | Vload_history = Fcons (tem, Vload_history); | 2317 | Vload_history = Fcons (tem, Vload_history); |
| 2318 | /* FIXME: There should be an unbind_to right after calling us which | 2318 | /* FIXME: There should be an unbind_to right after calling us which |
| 2319 | should re-establish the previous value of Vcurrent_load_list. */ | 2319 | should re-establish the previous value of Vcurrent_load_list. */ |