X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/63639d4409f53b229b9f0a397e42f3515c6d2023..ddf768c3cf57a412f525b53aa30f014db963deec:/src/bytecode.c diff --git a/src/bytecode.c b/src/bytecode.c index 33383ce7c1..9987c6118b 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -1,5 +1,5 @@ /* Execution of byte code produced by bytecomp.el. - Copyright (C) 1985, 1986, 1987, 1988, 1992 Free Software Foundation, Inc. + Copyright (C) 1985, 1986, 1987, 1988, 1993 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -308,7 +308,7 @@ If the third argument is incorrect, Emacs may crash.") pc - XSTRING (string_saved)->data); #endif - if (string_saved != bytestr) + if (! EQ (string_saved, bytestr)) { pc = pc - XSTRING (string_saved)->data + XSTRING (bytestr)->data; string_saved = bytestr; @@ -582,7 +582,7 @@ If the third argument is incorrect, Emacs may crash.") case Btemp_output_buffer_show: v1 = POP; - temp_output_buffer_show (TOP, Qnil); + temp_output_buffer_show (TOP); TOP = v1; /* pop binding of standard-output */ unbind_to (specpdl_ptr - specpdl - 1, Qnil);