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

SCM Repository

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

Diff of /trunk/src/compiler/common/error.sml

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

revision 2355, Sun Apr 7 11:35:08 2013 UTC revision 2356, Sun Apr 7 14:45:25 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.2355  
changed lines
  Added in v.2356

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