enum.out

来自「早期freebsd实现」· OUT 代码 · 共 12 行

reading symbolic information ...
type Color = (RED, GREEN, BLUE);
var c1 : Color;
[1] stop in P
[1] stopped in P at line 8
    8   begin
P(c = RED), line 8 in "enum.p"
program(), line 15 in "enum.p"
main(0x1, 0x7fffe7e8, 0x7fffe7f0) at 0x105
RED 
BLUE GREEN