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 297, Thu May 27 08:29:19 1999 UTC revision 299, Thu May 27 13:53:27 1999 UTC
# Line 17  Line 17 
17      val offset : info -> int      val offset : info -> int
18      val group : info -> AbsPath.t      val group : info -> AbsPath.t
19      val share : info -> bool option      val share : info -> bool option
20      val error : GeneralParams.params -> info -> complainer      val error : GeneralParams.info -> info -> complainer
21  end  end
22    
23  structure BinInfo :> BININFO = struct  structure BinInfo :> BININFO = struct
# Line 43  Line 43 
43      fun offset (INFO { offset = os, ... }) = os      fun offset (INFO { offset = os, ... }) = os
44      fun share (INFO { share = s, ... }) = s      fun share (INFO { share = s, ... }) = s
45    
46      fun error (gp: GeneralParams.params) (INFO { group, ... }) =      fun error (gp: GeneralParams.info) (INFO { group, ... }) =
47          GroupReg.error (#groupreg gp) group          GroupReg.error (#groupreg gp) group
48  end  end

Legend:
Removed from v.297  
changed lines
  Added in v.299

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