CVS: sml-dist/src/compiler/Elaborator/elaborate elabmod.sml, 1.2.20.6, 1.2.20.7
George Kuan <[email protected]> Sat, 05 Aug 2006 23:05:11 -0700
| Newsgroups | gmane.comp.lang.sml.smlnj.commits |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/smlnj/sml-dist/src/compiler/Elaborator/elaborate
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv30252/src/compiler/Elaborator/elaborate
Modified Files:
Tag: primop-branch-2
elabmod.sml
Log Message:
hooked up PPPrim and turned off some debugging printouts
Index: elabmod.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/compiler/Elaborator/elaborate/elabmod.sml,v
retrieving revision 1.2.20.6
retrieving revision 1.2.20.7
diff -C2 -d -r1.2.20.6 -r1.2.20.7
*** elabmod.sml 31 Jul 2006 18:07:16 -0000 1.2.20.6
--- elabmod.sml 6 Aug 2006 06:05:08 -0000 1.2.20.7
***************
*** 669,673 ****
(fn ppstrm => PPAst.ppStrExp (env, NONE) ppstrm (v, 10))
val str = LU.lookStr(env,SP.SPATH path,error region)
- val _ = print "lookStr ### \n"
(*
val _ = showStr("--elab[VarStr]: str: ",str,env)
--- 669,672 ----
***************
*** 1269,1273 ****
| OpenDec paths =>
let val err = error region
- val _ = print "elabDecl0 \n"
val strs = map (fn s => let val sp = SP.SPATH s
in (sp, LU.lookStr(env0, sp, err))
--- 1268,1271 ----
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys -- and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV