home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 3 / AACD03.BIN / AACD / Programming / sofa / archive / SmallEiffel.lha / SmallEiffel / sys / gc_lib / m68k.c < prev    next >
Text File  |  1999-06-05  |  268b  |  16 lines
  1. /* For Motorola 68K Garbage Collector marking code. */
  2.  
  3. void marking_loop(void){
  4.   void**sp;
  5.   void*stack_top={NULL,NULL};
  6.   sp=stack_top;
  7.   for(;sp>=stack_bottom;sp--)
  8.     gc_mark(*sp);
  9. }
  10.  
  11. void mark_stack_and_registers(void){
  12.   asm(" ld A0 SP");
  13.   marking_loop();
  14. }
  15.  
  16.