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/branches/SMLNJ/src/compiler/Semant/pickle/unpickmod.sml
ViewVC logotype

Diff of /sml/branches/SMLNJ/src/compiler/Semant/pickle/unpickmod.sml

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

revision 166, Sat Nov 7 20:11:41 1998 UTC revision 167, Sat Nov 7 20:11:41 1998 UTC
# Line 1017  Line 1017 
1017    
1018        and spec #"T" = ?tycon(fn Utycon t =>        and spec #"T" = ?tycon(fn Utycon t =>
1019                         ?entVar(fn Ustamp v =>                         ?entVar(fn Ustamp v =>
1020                            ?bool(fn Ubool r =>
1021                          R.int(fn s =>                          R.int(fn s =>
1022                           %Uspec(M.TYCspec{spec=t, entVar=v, scope=s}))))                            %Uspec(M.TYCspec{spec=t, entVar=v, repl=r,scope=s})))))
1023          | spec #"S" = ?Signature (fn USignature s =>          | spec #"S" = ?Signature (fn USignature s =>
1024                         R.int (fn d =>                         R.int (fn d =>
1025                          ?strDefIntOption(fn UstrDefIntOption e =>                          ?strDefIntOption(fn UstrDefIntOption e =>
# Line 1253  Line 1254 
1254    
1255    
1256  (*  (*
1257   * $Log$   * $Log: unpickmod.sml,v $
1258     * Revision 1.4  1998/05/23 14:10:13  george
1259     *   Fixed RCS keyword syntax
1260     *
1261   *)   *)

Legend:
Removed from v.166  
changed lines
  Added in v.167

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