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 8, Sun Jan 18 01:01:29 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.2  1998/01/18 01:00:04  monnier
7   * Initial revision   * *** empty log message ***
8     *
9     * Revision 1.2  1997/10/28 15:02:45  george
10     *    Made compatible with new basis
11   *   *
12  # Revision 1.1.1.1  1997/01/14  01:37:59  george  # Revision 1.1.1.1  1997/01/14  01:37:59  george
13  #   Version 109.24  #   Version 109.24
# Line 884  Line 887 
887              saynl "    datatype s_node =";              saynl "    datatype s_node =";
888              iter (loop_node, !nb_t);              iter (loop_node, !nb_t);
889              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";
890              saynl "    val sub = System.Unsafe.subscript";              saynl "    val sub = Array.sub";
891              saynl "    val update = System.Unsafe.update"              saynl "    val update = Array.update"
892            end            end
893    
894    

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

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