Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/lamont/src/compiler/common/error.sml
ViewVC logotype

Diff of /branches/lamont/src/compiler/common/error.sml

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

revision 2297, Fri Mar 15 22:05:31 2013 UTC revision 2298, Fri Mar 15 22:18:22 2013 UTC
# Line 18  Line 18 
18      val mkErrStream : string -> err_stream      val mkErrStream : string -> err_stream
19    
20      val anyErrors : err_stream -> bool      val anyErrors : err_stream -> bool
21        val anyWarnings : err_stream -> bool
22      val sourceFile : err_stream -> string      val sourceFile : err_stream -> string
23      val sourceMap : err_stream -> AntlrStreamPos.sourcemap      val sourceMap : err_stream -> AntlrStreamPos.sourcemap
24    
# Line 90  Line 91 
91            }            }
92    
93      fun anyErrors (ES{numErrors, ...}) = (!numErrors > 0)      fun anyErrors (ES{numErrors, ...}) = (!numErrors > 0)
94        fun anyWarnings (ES{numWarnings, ...}) = (!numWarnings > 0)
95      fun sourceFile (ES{srcFile, ...}) = srcFile      fun sourceFile (ES{srcFile, ...}) = srcFile
96      fun sourceMap (ES{sm, ...}) = sm      fun sourceMap (ES{sm, ...}) = sm
97    

Legend:
Removed from v.2297  
changed lines
  Added in v.2298

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