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/depend/indegree.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/depend/indegree.sml

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

revision 651, Thu Jun 1 18:34:03 2000 UTC revision 652, Tue Jun 6 02:14:56 2000 UTC
# Line 41  Line 41 
41                  foldl inc_sn (foldl (fsb inc_sn) m gi) li                  foldl inc_sn (foldl (fsb inc_sn) m gi) li
42              end              end
43    
44              fun impexp ((n, _), m) = fsb snode (n, m)              fun impexp ((nth, _, _), m) = fsb snode (nth (), m)
45          in          in
46              SymbolMap.foldl impexp M.empty exports              SymbolMap.foldl impexp M.empty exports
47          end          end

Legend:
Removed from v.651  
changed lines
  Added in v.652

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