CVS: sml-dist/src/compiler/FLINT/trans transtypes.sml, 1.5.10.8, 1.5.10.9
George Kuan <[email protected]> Mon, 21 Aug 2006 13:41:23 -0700
| Newsgroups | gmane.comp.lang.sml.smlnj.commits |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/smlnj/sml-dist/src/compiler/FLINT/trans
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv24210/src/compiler/FLINT/trans
Modified Files:
Tag: primop-branch-2
transtypes.sml
Log Message:
newlines for transtypes warnings
Index: transtypes.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/compiler/FLINT/trans/transtypes.sml,v
retrieving revision 1.5.10.8
retrieving revision 1.5.10.9
diff -C2 -d -r1.5.10.8 -r1.5.10.9
*** transtypes.sml 18 Aug 2006 22:58:46 -0000 1.5.10.8
--- transtypes.sml 21 Aug 2006 20:40:35 -0000 1.5.10.9
***************
*** 275,282 ****
LT.tcc_var(DI.calc(d, depth), num)
end
! | h (UBOUND _) = (print "#### toTyc UBOUND!"; LT.tcc_void)
(* dbm: should this have been converted to a TV_MARK before
* being passed to toTyc? *)
! | h (OPEN _) = (print "#### toTyc OPEN!"; LT.tcc_void)
| h _ = bug "toTyc:h" (* LITERAL and SCHEME should not occur *)
--- 275,282 ----
LT.tcc_var(DI.calc(d, depth), num)
end
! | h (UBOUND _) = (print "#### toTyc UBOUND!\n"; LT.tcc_void)
(* dbm: should this have been converted to a TV_MARK before
* being passed to toTyc? *)
! | h (OPEN _) = (print "#### toTyc OPEN!\n"; LT.tcc_void)
| h _ = bug "toTyc:h" (* LITERAL and SCHEME should not occur *)
-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642