equal
deleted
inserted
replaced
407 |
407 |
408 %{ /* NOCONTEXT */ |
408 %{ /* NOCONTEXT */ |
409 |
409 |
410 /* made this a primitive to get define in stc.h */ |
410 /* made this a primitive to get define in stc.h */ |
411 |
411 |
412 RETURN ((__intVal(__INST(flags)) & F_DYNAMIC) ? true : false); |
412 RETURN (( (INT)(__INST(flags)) & __MASKSMALLINT(F_DYNAMIC)) ? true : false); |
413 %} |
413 %} |
414 ! |
414 ! |
415 |
415 |
416 dynamic:aBoolean |
416 dynamic:aBoolean |
417 "set/clear the flag bit stating that the machine code was created |
417 "set/clear the flag bit stating that the machine code was created |
459 |
459 |
460 %{ /* NOCONTEXT */ |
460 %{ /* NOCONTEXT */ |
461 |
461 |
462 /* made this a primitive to get define in stc.h */ |
462 /* made this a primitive to get define in stc.h */ |
463 |
463 |
464 RETURN ((__intVal(__INST(flags)) & F_MARKBIT) ? true : false); |
464 RETURN (( (INT)(__INST(flags)) & __MASKSMALLINT(F_MARKBIT)) ? true : false); |
465 %} |
465 %} |
466 ! |
466 ! |
467 |
467 |
468 markFlag:aBoolean |
468 markFlag:aBoolean |
469 "set/clear the mark flag bit. |
469 "set/clear the mark flag bit. |
574 ! ! |
574 ! ! |
575 |
575 |
576 !CompiledCode class methodsFor:'documentation'! |
576 !CompiledCode class methodsFor:'documentation'! |
577 |
577 |
578 version |
578 version |
579 ^ '$Header: /cvs/stx/stx/libbasic/Attic/CompCode.st,v 1.35 1996-09-20 07:28:41 cg Exp $' |
579 ^ '$Header: /cvs/stx/stx/libbasic/Attic/CompCode.st,v 1.36 1996-10-16 19:14:05 cg Exp $' |
580 ! ! |
580 ! ! |
581 CompiledCode initialize! |
581 CompiledCode initialize! |