*COMDECK SCMSPACE 
#LCM# CONTROL IFNQ SYMTBLV,0; 
  
      # THIS IS THE QUICK AND DIRTY ALLOCATION OF CODE BUFFERS TO SCM  #
      #                                                                #
      # IT SHOULD NOT MATTER THAT THESE BUFFERS RESIDE IN (0,0) SINCE  #
      # (1,6) IS ABOUT THE LONGEST OVERLAY ANYWAY                      #
      #                                                                #
      # PUTTING THEM IN THE FREESPACE ABOVE HHA WILL BE RELATIVELY     #
      # EASY ONCE ANY AUTOMATIC FL MANAGEMENT IS PUT IN                #
      #                                                                #
      # PUTTING THEM IN THE FREESPACE BETWEEN (1,6) AND HHA IS AN      #
      # ENTIRELY NON-TRIVIAL PROBLEM SINCE THEY ARE REFERENCED FROM    #
      # BOTH (0,0) AND (1,6)                                           #
      #                                                                #
      DEF  FREESPACESIZ #O"4000"#;
      COMMON SCMSPACE;
         BEGIN  #SCMSPACE#
         ARRAY FREESPACE[FREESPACESIZ] S(1);  ITEM
            SPALK   (0,0,18),      #CODE-BUFF LINK FIELD #               SCMSPAC
            SPACE0  (0,0,60);          #WHOLE WORD OVERLAY/FREE BLK PTR#
         END  #SCMSPACE#
  
#LCM# CONTROL ENDIF;
