Mercurial > urweb
changeset 1395:f53ec50097a5
Fix type-checking of views to match change to sql_query type
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Sat, 15 Jan 2011 15:06:33 -0500 |
parents | d328983dc5a6 |
children | 115d217bbfbc |
files | src/elaborate.sml |
diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/elaborate.sml Sat Jan 15 14:53:13 2011 -0500 +++ b/src/elaborate.sml Sat Jan 15 15:06:33 2011 -0500 @@ -3926,6 +3926,7 @@ val ct = queryOf () val ct = (L'.CApp (ct, (L'.CRecord ((L'.KRecord (L'.KType, loc), loc), []), loc)), loc) + val ct = (L'.CApp (ct, (L'.CRecord ((L'.KRecord (L'.KType, loc), loc), []), loc)), loc) val ct = (L'.CApp (ct, ts), loc) val ct = (L'.CApp (ct, fs), loc) in