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/compiler/CodeGen/ppc/ppcCG.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/CodeGen/ppc/ppcCG.sml

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

revision 823, Tue May 8 21:25:15 2001 UTC revision 909, Fri Aug 24 17:48:53 2001 UTC
# Line 15  Line 15 
15    
16      structure OmitFramePtr = struct      structure OmitFramePtr = struct
17        exception NotImplemented        exception NotImplemented
18        structure F=PPCFlowGraph        structure CFG=PPCCFG
19        structure I=PPCInstr        structure I=PPCInstr
20        val vfp = PPCCpsRegs.vfp        val vfp = PPCCpsRegs.vfp
21        fun omitframeptr _ = raise NotImplemented        fun omitframeptr _ = raise NotImplemented
# Line 29  Line 29 
29             structure ExtensionComp = SMLNJMLTreeExtComp             structure ExtensionComp = SMLNJMLTreeExtComp
30                 (structure I = PPCInstr                 (structure I = PPCInstr
31                  structure T = PPCMLTree                  structure T = PPCMLTree
32                    structure CFG = PPCCFG
33                 )                 )
34             val bit64mode=false             val bit64mode=false
35             val multCost=ref 6 (* an estimate *)             val multCost=ref 6 (* an estimate *)
# Line 39  Line 40 
40                  structure Shuffle=PPCShuffle)                  structure Shuffle=PPCShuffle)
41    
42      structure BackPatch =      structure BackPatch =
43         BBSched2(structure Flowgraph = PPCFlowGraph         BBSched2(structure CFG = PPCCFG
44                    structure Placement = DefaultBlockPlacement(PPCCFG)
45                  structure Jumps = Jumps                  structure Jumps = Jumps
46                  structure Emitter = PPCMCEmitter)                  structure Emitter = PPCMCEmitter)
47    
48      structure RA =      structure RA =
49         RISC_RA         RISC_RA
50           (structure I         = PPCInstr           (structure I         = PPCInstr
51            structure Flowgraph = PPCFlowGraph            structure Flowgraph = PPCCFG
52            structure CpsRegs   = PPCCpsRegs            structure CpsRegs   = PPCCpsRegs
53            structure InsnProps = InsnProps            structure InsnProps = InsnProps
54            structure Rewrite   = PPCRewrite(PPCInstr)            structure Rewrite   = PPCRewrite(PPCInstr)

Legend:
Removed from v.823  
changed lines
  Added in v.909

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