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/stable/bininfo.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/stable/bininfo.sml

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

revision 306, Tue Jun 1 08:25:21 1999 UTC revision 329, Fri Jun 11 09:53:10 1999 UTC
# Line 15  Line 15 
15      type region = GenericVC.SourceMap.region      type region = GenericVC.SourceMap.region
16    
17      val new : { group: AbsPath.t,      val new : { group: AbsPath.t,
18                    stablepath: AbsPath.t,
19                  error: complainer,                  error: complainer,
20                  spec: string,                  spec: string,
21                  offset: int,                  offset: int,
# Line 24  Line 25 
25      val describe : info -> string      val describe : info -> string
26      val offset : info -> int      val offset : info -> int
27      val group : info -> AbsPath.t      val group : info -> AbsPath.t
28        val stablepath : info -> AbsPath.t
29      val share : info -> bool option      val share : info -> bool option
30      val error : info -> complainer      val error : info -> complainer
31  end  end
# Line 35  Line 37 
37    
38      datatype info =      datatype info =
39          INFO of { group: AbsPath.t,          INFO of { group: AbsPath.t,
40                      stablepath: AbsPath.t,
41                    spec: string,                    spec: string,
42                    offset: int,                    offset: int,
43                    share: bool option,                    share: bool option,
# Line 55  Line 58 
58      fun group (INFO { group = g, ... }) = g      fun group (INFO { group = g, ... }) = g
59      fun offset (INFO { offset = os, ... }) = os      fun offset (INFO { offset = os, ... }) = os
60      fun share (INFO { share = s, ... }) = s      fun share (INFO { share = s, ... }) = s
61        fun stablepath (INFO { stablepath = sp, ... }) = sp
62    
63      fun error (INFO { error = e, ... }) = e      fun error (INFO { error = e, ... }) = e
64  end  end

Legend:
Removed from v.306  
changed lines
  Added in v.329

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