comparison src/source_print.sml @ 219:5292c0113024

SQL comparison operators
author Adam Chlipala <adamc@hcoop.net>
date Sat, 16 Aug 2008 17:18:00 -0400
parents e86411f647c6
children bbe5899a9585
comparison
equal deleted inserted replaced
218:a3413288cce1 219:5292c0113024
284 space, 284 space,
285 string "=>", 285 string "=>",
286 space, 286 space,
287 p_exp e]) pes]) 287 p_exp e]) pes])
288 288
289 | ESqlInfer => string "<sql-infer>" 289 | EWild => string "_"
290 290
291 and p_exp e = p_exp' false e 291 and p_exp e = p_exp' false e
292 292
293 fun p_datatype (x, xs, cons) = 293 fun p_datatype (x, xs, cons) =
294 box [string "datatype", 294 box [string "datatype",