comparison src/bytecode.c @ 9467:c8c24d83ac00

(Fbyte_code): Skip optimization for all Lisp_Misc types.
author Karl Heuer <kwzh@gnu.org>
date Wed, 12 Oct 1994 05:17:52 +0000
parents 77cd47d7f172
children a541739a1ba8
comparison
equal deleted inserted replaced
9466:9052bf69f7de 9467:c8c24d83ac00
348 #endif 348 #endif
349 { 349 {
350 case Lisp_Symbol: 350 case Lisp_Symbol:
351 if (!EQ (v2, Qunbound)) 351 if (!EQ (v2, Qunbound))
352 break; 352 break;
353 case Lisp_Intfwd: 353 case Lisp_Misc:
354 case Lisp_Boolfwd:
355 case Lisp_Objfwd:
356 case Lisp_Buffer_Local_Value: 354 case Lisp_Buffer_Local_Value:
357 case Lisp_Some_Buffer_Local_Value: 355 case Lisp_Some_Buffer_Local_Value:
358 case Lisp_Buffer_Objfwd:
359 v2 = Fsymbol_value (v1); 356 v2 = Fsymbol_value (v1);
360 } 357 }
361 } 358 }
362 PUSH (v2); 359 PUSH (v2);
363 break; 360 break;