CVS: sml-dist/src/compiler/Elaborator/elaborate elabmod.sml, 1.2.20.7, 1.2.20.8

Update of /cvsroot/smlnj/sml-dist/src/compiler/Elaborator/elaborate
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv4725/src/compiler/Elaborator/elaborate

Modified Files:
      Tag: primop-branch-2
	elabmod.sml 
Log Message:
made plambda lexp printout dependent on debugging flag

Index: elabmod.sml
===================================================================
RCS file: /cvsroot/smlnj/sml-dist/src/compiler/Elaborator/elaborate/elabmod.sml,v
retrieving revision 1.2.20.7
retrieving revision 1.2.20.8
diff -C2 -d -r1.2.20.7 -r1.2.20.8
*** elabmod.sml	6 Aug 2006 06:05:08 -0000	1.2.20.7
--- elabmod.sml	7 Aug 2006 03:52:32 -0000	1.2.20.8
***************
*** 666,671 ****
    | elab (v as VarStr path, env, entEnv, region) =
        let val _ = debugmsg ">>elab[VarStr]"
- 	  val _ = error region EM.WARN "VarStr lookStr: " 
- 			(fn ppstrm => PPAst.ppStrExp (env, NONE) ppstrm (v, 10))  
            val str = LU.lookStr(env,SP.SPATH path,error region)
  (*
--- 666,669 ----


-------------------------------------------------------------------------
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