diff options
| author | Vitalie Spinu <spinuvit@gmail.com> | 2016-03-21 05:41:55 +0100 |
|---|---|---|
| committer | Vitalie Spinu <spinuvit@gmail.com> | 2016-03-29 23:29:54 +0200 |
| commit | 7068e4c811f7530e14d2684fea68499418642b33 (patch) | |
| tree | 3c44890147e77c32a5a9f4aeb60ca88d9eb6a050 /src/bytecode.c | |
| parent | f99b51295b86770e4b16d4717c0e73049191c4c5 (diff) | |
| download | emacs-scratch/hard-narrow.tar.gz | |
Hard narrowingscratch/hard-narrow
Idem
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 9ae2e820d51..8cefa10475c 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -1682,17 +1682,18 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth, CASE (Bnarrow_to_region): { - Lisp_Object v1; + Lisp_Object v1, v2; BEFORE_POTENTIAL_GC (); v1 = POP; - TOP = Fnarrow_to_region (TOP, v1); + v2 = POP; + TOP = Fnarrow_to_region (TOP, v2, v1); AFTER_POTENTIAL_GC (); NEXT; } CASE (Bwiden): BEFORE_POTENTIAL_GC (); - PUSH (Fwiden ()); + TOP = Fwiden (TOP); AFTER_POTENTIAL_GC (); NEXT; |