littletest46.out

来自「格式化源码的最新板」· OUT 代码 · 共 17 行

unit littletest46;

interface

type
  pinteger = ^integer;
  p_char   = ^char;
  pptr     = ^pointer;
  ppptr    = ^pptr;
  pfile    = ^file;
  tfoo     = (fish, wibble, spon);
  pfoo     = ^tfoo;

implementation

end.