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/smlfile/skel-cvt.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/smlfile/skel-cvt.sml

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

revision 878, Wed Jul 18 17:43:27 2001 UTC revision 879, Thu Jul 19 18:59:38 2001 UTC
# Line 22  Line 22 
22   *                         contact: Gene Rollins (rollins+@cs.cmu.edu)   *                         contact: Gene Rollins (rollins+@cs.cmu.edu)
23   *)   *)
24  signature SKELCVT = sig  signature SKELCVT = sig
25      val convert : { tree: GenericVC.Ast.dec,      val convert : { tree: Ast.dec,
26                      err: GenericVC.ErrorMsg.severity ->                      err: ErrorMsg.severity -> Ast.region -> string -> unit }
                          GenericVC.Ast.region -> string -> unit }  
27          -> { skeleton : Skeleton.decl, complain : unit -> unit }          -> { skeleton : Skeleton.decl, complain : unit -> unit }
28  end  end
29    
30  structure SkelCvt :> SKELCVT = struct  structure SkelCvt :> SKELCVT = struct
31    
32      open GenericVC.Ast Skeleton      open Ast Skeleton
33    
34      structure S = Symbol      structure S = Symbol
35      structure SP = GenericVC.SymPath      structure SP = SymPath
36      structure SS = SymbolSet      structure SS = SymbolSet
37      structure EM = GenericVC.ErrorMsg      structure EM = ErrorMsg
38    
39      type symbol = Symbol.symbol      type symbol = Symbol.symbol
40      type path = symbol list      type path = symbol list

Legend:
Removed from v.878  
changed lines
  Added in v.879

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