gc.6 656 B

123456789101112131415161718192021222324252627282930313233343536373839
  1. ;;
  2. ;; Main file for CLU Garbage Collector
  3. ;;
  4. ;; Just inserts other sections
  5. ;;
  6. ;; set flag to my special value and insert type code
  7. ;; stuff from clu system code
  8. ;;
  9. usrflg==-1
  10. .insrt clusys;types >
  11. ;;
  12. ;; gcincl has macros and global symbol definitions
  13. ;;
  14. .insrt gcincl >
  15. ;;
  16. ;; gc0 sets up arguments for debugging
  17. ;;
  18. .insrt gc0 >
  19. ;;
  20. ;; gc1 checks arguments, creates inferior, and maps pages out
  21. ;;
  22. .insrt gc1 >
  23. ;;
  24. ;; gc2 transform frames to "nice" format
  25. ;;
  26. .insrt gc2 >
  27. ;;
  28. ;; gccall has all the .call's
  29. ;;
  30. .insrt gccall >
  31. ;;
  32. ;; symbol defines the end of space we use for our code
  33. ;;
  34. last:
  35. ;;
  36. ;; start at begin, which is in gc0
  37. ;;
  38. end begin