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

Diff of /sml/trunk/src/ml-burg/burg.sml

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

revision 3, Sat Oct 4 23:33:46 1997 UTC revision 93, Tue May 12 21:56:22 1998 UTC
# Line 3  Line 3 
3   * COPYRIGHT (c) 1995 AT&T Bell Laboratories.   * COPYRIGHT (c) 1995 AT&T Bell Laboratories.
4   *   *
5   * $Log$   * $Log$
6   * Revision 1.1  1997/10/04 23:33:22  monnier   * Revision 1.1.1.3  1998/05/12 21:56:17  monnier
7   * Initial revision   * *** empty log message ***
8     *
9     * Revision 1.1.1.1  1998/04/08 18:40:05  george
10     * Version 110.5
11     *
12     * Revision 1.2  1997/10/28 15:02:45  george
13     *    Made compatible with new basis
14   *   *
15  # Revision 1.1.1.1  1997/01/14  01:37:59  george  # Revision 1.1.1.1  1997/01/14  01:37:59  george
16  #   Version 109.24  #   Version 109.24
# Line 884  Line 890 
890              saynl "    datatype s_node =";              saynl "    datatype s_node =";
891              iter (loop_node, !nb_t);              iter (loop_node, !nb_t);
892              saynl "    withtype s_tree = s_cost * s_rule * s_node * tree\n\n";              saynl "    withtype s_tree = s_cost * s_rule * s_node * tree\n\n";
893              saynl "    val sub = System.Unsafe.subscript";              saynl "    val sub = Array.sub";
894              saynl "    val update = System.Unsafe.update"              saynl "    val update = Array.update"
895            end            end
896    
897    

Legend:
Removed from v.3  
changed lines
  Added in v.93

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