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

Diff of /sml/trunk/src/MLRISC/ppc/mltree/ppc.sml

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

revision 1009, Wed Jan 9 19:44:22 2002 UTC revision 1117, Wed Mar 6 15:29:24 2002 UTC
# Line 1  Line 1 
1  (*  (* ppc.sml
2     *
3     * COPYRIGHT (c) 2002 Bell Labs, Lucent Technologies
4     *
5   * I've substantially modified this code generator to support the new MLTREE.   * I've substantially modified this code generator to support the new MLTREE.
6   * Please see the file README.hppa for the ugly details.   * Please see the file README.hppa for the ugly details.
7   *   *
# Line 42  Line 45 
45    val (intTy,naturalWidths) = if bit64mode then (64,[32,64]) else (32,[32])    val (intTy,naturalWidths) = if bit64mode then (64,[32,64]) else (32,[32])
46    structure Gen = MLTreeGen    structure Gen = MLTreeGen
47      (structure T = T      (structure T = T
48         structure Cells = C
49       val intTy = intTy       val intTy = intTy
50       val naturalWidths = naturalWidths       val naturalWidths = naturalWidths
51       datatype rep = SE | ZE | NEITHER       datatype rep = SE | ZE | NEITHER

Legend:
Removed from v.1009  
changed lines
  Added in v.1117

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