Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/cm/compile/recomp.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/compile/recomp.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 319, Mon Jun 7 22:47:00 1999 UTC revision 320, Tue Jun 8 07:42:11 1999 UTC
# Line 233  Line 233 
233                                   | BF.Compile _ => NONE                                   | BF.Compile _ => NONE
234                                   | e => let                                   | e => let
235                                         fun ppb pps =                                         fun ppb pps =
236                                             (PP.add_string pps                                             (PP.add_newline pps;
237                                                  (General.exnMessage e);                                              PP.add_string pps
238                                              PP.add_newline pps)                                                 (General.exnMessage e))
239                                     in                                     in
240                                         SmlInfo.error gp i EM.COMPLAIN                                         SmlInfo.error gp i EM.COMPLAIN
241                                            ("exception raised while compiling "                                            ("exception raised while compiling "

Legend:
Removed from v.319  
changed lines
  Added in v.320

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0