test45.abs

来自「tiger编译器的Java实现」· ABS 代码 · 共 22 行

 LetExp(
  DecList(
   TypeDec(rectype,
    RecordTy(
     Fieldlist(
      name
      string,
      true,
      Fieldlist(
       id
       int,
       true,
       Fieldlist())))),
   DecList(
    VarDec(a,
     NilExp(),
     true),
    DecList())),
  SeqExp(
   ExpList(
    varExp(
     SimpleVar(a)))))