clist

来自「<B>Digital的Unix操作系统VAX 4.2源码</B>」· 代码 · 共 12 行

.>3
<3>4
*<3>c
*(<3+4)>f
(<f&7fffffff)>f
(<f#20-<f)>i
(((<c-<i)#20)%20)>l
,<l$<<clist.nxt
(<f&7fffffff)>f
(80000000|<f),<c/C
<4/D