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

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

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

revision 305, Mon May 31 15:00:06 1999 UTC revision 306, Tue Jun 1 08:25:21 1999 UTC
# Line 55  Line 55 
55                      val gs = foldl fbn empty globalimports                      val gs = foldl fbn empty globalimports
56                      val ls = foldl bn gs localimports                      val ls = foldl bn gs localimports
57                      val s' = check (BinInfo.share i, BinInfo.describe i, ls,                      val s' = check (BinInfo.share i, BinInfo.describe i, ls,
58                                      BinInfo.error gp i)                                      BinInfo.error i)
59                  in                  in
60                      stablemap := StableMap.insert (!stablemap, i, s');                      stablemap := StableMap.insert (!stablemap, i, s');
61                      StringSet.union (s, s')                      StringSet.union (s, s')

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

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