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 932, Tue Sep 18 19:35:32 2001 UTC revision 933, Wed Sep 19 19:31:19 2001 UTC
# Line 7  Line 7 
7    
8  functor PPC  functor PPC
9    (structure PPCInstr : PPCINSTR    (structure PPCInstr : PPCINSTR
    structure ExtensionComp : MLTREE_EXTENSION_COMP where I = PPCInstr  
10     structure PseudoInstrs : PPC_PSEUDO_INSTR     structure PseudoInstrs : PPC_PSEUDO_INSTR
11        sharing PseudoInstrs.I = PPCInstr                          where I = PPCInstr
12       structure ExtensionComp : MLTREE_EXTENSION_COMP
13                            where I = PPCInstr and T = PPCInstr.T
14    
15     (*     (*
16      * Support 64 bit mode?      * Support 64 bit mode?
# Line 21  Line 22 
22      * Cost of multiplication in cycles      * Cost of multiplication in cycles
23      *)      *)
24     val multCost : int ref     val multCost : int ref
25    ) : MLTREECOMP =    ) =
26  struct  struct
27    structure I   = PPCInstr    structure I   = PPCInstr
28    structure T   = I.T    structure T   = I.T

Legend:
Removed from v.932  
changed lines
  Added in v.933

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