comparison src/core.sml @ 954:2a50da66ffd8

Basic tail recursion introduction seems to be working
author Adam Chlipala <adamc@hcoop.net>
date Thu, 17 Sep 2009 16:35:11 -0400
parents ed06e25c70ef
children dfe34fad749d
comparison
equal deleted inserted replaced
953:301530da2062 954:2a50da66ffd8
114 | EClosure of int * exp list 114 | EClosure of int * exp list
115 115
116 | ELet of string * con * exp * exp 116 | ELet of string * con * exp * exp
117 117
118 | EServerCall of int * exp list * exp * con * con 118 | EServerCall of int * exp list * exp * con * con
119 | ETailCall of int * exp list * exp * con * con
119 120
120 withtype exp = exp' located 121 withtype exp = exp' located
121 122
122 datatype effect = datatype Export.effect 123 datatype effect = datatype Export.effect
123 datatype export_kind = datatype Export.export_kind 124 datatype export_kind = datatype Export.export_kind