Mirror of CollapseOS
25개 이상의 토픽을 선택하실 수 없습니다. Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

17 lines
797B

  1. ( RLDICT pre-comment: Copy dict from target wordref, including
  2. header, up to HERE. We're going relocate those words by
  3. specified offset. To do this, we're copying this whole memory
  4. area in HERE and then iterate through that copied area and call
  5. RLWORD on each word. That results in a dict that can be
  6. concatenated to target's prev entry in a more compact way.
  7. This copy of data doesn't allocate anything, so H@ doesn't
  8. move. Moreover, we reserve 4 bytes at H@ to write our target
  9. and offset because otherwise, things get too complicated with
  10. the PSP.
  11. The output of this word is 3 numbers: top copied address, top
  12. copied CURRENT, and then the beginning of the copied dict at
  13. the end to indicate that we're finished processing.
  14. cont. )