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/MLRISC/graphs/digraph.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/graphs/digraph.sml

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

revision 470, Wed Nov 10 22:42:52 1999 UTC revision 545, Thu Feb 24 13:56:44 2000 UTC
# Line 4  Line 4 
4   * -- Allen   * -- Allen
5   *)   *)
6    
7  functor DirectedGraphFn(A : ARRAY) :  functor DirectedGraph(A : ARRAY) :
8  sig include GRAPH_IMPLEMENTATION  sig include GRAPH_IMPLEMENTATION
9    
10      type 'e adjlist   = 'e Graph.edge list A.array      type 'e adjlist   = 'e Graph.edge list A.array
# Line 153  Line 153 
153     in  newGraph{name=name,info=info,nodes=nodes,succ=succ,pred=pred} end     in  newGraph{name=name,info=info,nodes=nodes,succ=succ,pred=pred} end
154  end  end
155    
156  structure DirectedGraph = DirectedGraphFn(DynArray)  structure DirectedGraph = DirectedGraph(DynArray)
157    

Legend:
Removed from v.470  
changed lines
  Added in v.545

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