comparison src/mono_print.sml @ 129:78d59cf0a0cc

Compiled (non-mutual) 'val rec'
author Adam Chlipala <adamc@hcoop.net>
date Thu, 17 Jul 2008 11:02:10 -0400
parents 76a4d69719d8
children f0d3402184d1
comparison
equal deleted inserted replaced
128:b04f7422c832 129:78d59cf0a0cc
181 | DExport (s, n, ts) => box [string "export", 181 | DExport (s, n, ts) => box [string "export",
182 space, 182 space,
183 p_enamed env n, 183 p_enamed env n,
184 space, 184 space,
185 string "as", 185 string "as",
186 space,
186 string s, 187 string s,
187 p_list_sep (string "") (fn t => box [space, 188 p_list_sep (string "") (fn t => box [space,
188 string "(", 189 string "(",
189 p_typ env t, 190 p_typ env t,
190 string ")"]) ts] 191 string ")"]) ts]