loop

来自「编译原理大作业---tiger编译器 包括semant,translate,m」· 代码 · 共 12 行

/* error: mutually recursive types thet do not pass through record or array */
let 

type a=b
type b=a
type c=int
type d=a

in
 ""
end