comparison src/eval.c @ 50747:f38d1373681e

(Fsignal): Clear abort_on_gc.
author Richard M. Stallman <rms@gnu.org>
date Wed, 30 Apr 2003 12:06:04 +0000
parents 0c4bf42e6557
children 921f62e6b6ad
comparison
equal deleted inserted replaced
50746:2a57a6e6b390 50747:f38d1373681e
1452 Lisp_Object string; 1452 Lisp_Object string;
1453 Lisp_Object real_error_symbol; 1453 Lisp_Object real_error_symbol;
1454 struct backtrace *bp; 1454 struct backtrace *bp;
1455 1455
1456 immediate_quit = handling_signal = 0; 1456 immediate_quit = handling_signal = 0;
1457 abort_on_gc = 0;
1457 if (gc_in_progress || waiting_for_input) 1458 if (gc_in_progress || waiting_for_input)
1458 abort (); 1459 abort ();
1459 1460
1460 if (NILP (error_symbol)) 1461 if (NILP (error_symbol))
1461 real_error_symbol = Fcar (data); 1462 real_error_symbol = Fcar (data);