浏览代码

made to work on small machines

ceriel 36 年之前
父节点
当前提交
de43db22b3
共有 1 个文件被更改,包括 4 次插入4 次删除
  1. 4 4
      lang/occam/lib/misc.e

+ 4 - 4
lang/occam/lib/misc.e

@@ -34,14 +34,14 @@ oldtrp
 
  exp $block_move
  pro $block_move, 0
- lal 4
+ lal EM_PSIZE
  loi EM_PSIZE
- lal 8
+ lal 2*EM_PSIZE
  loi EM_PSIZE
 
  lal 0
- loi EM_LSIZE
- loc EM_LSIZE
+ loi EM_PSIZE
+ loc EM_PSIZE
  loc EM_WSIZE
  cuu
  bls EM_WSIZE