Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/src/compiler/CodeGen/ppc/ppcMLTree.sml
ViewVC logotype

View of /sml/trunk/src/compiler/CodeGen/ppc/ppcMLTree.sml

Parent Directory Parent Directory | Revision Log Revision Log

Revision 555 - (download) (annotate)
Fri Mar 3 16:10:30 2000 UTC (20 years, 5 months ago) by george
File size: 1189 byte(s)
lal-20000303-new mltree -- take II
(* COPYRIGHT (c) 1999 Lucent Technologies, Bell Labs. *)

(* constants specialised to the powerpc *)
structure PPCConst = SMLNJConstant

(* specialised powerpc instruction set *)
structure PPCInstr = 
  PPCInstr(structure LabelExp=SMLNJLabelExp
	   structure Region=CPSRegions)

structure PPCProps = PPCProps(PPCInstr)

structure PPCShuffle = PPCShuffle(PPCInstr)

structure PPCPseudoOps = PseudoOpsBig(PPCSpec)

(* Flowgraph data structure specialized to DEC alpha instructions *)
structure PPCFlowGraph = 
  FlowGraph(structure I=PPCInstr
	    structure P=PPCPseudoOps

structure PPCStream = InstructionStream(PPCPseudoOps)

structure PPCAsmEmitter=
  PPCAsmEmitter(structure Instr=PPCInstr
		structure PseudoOps=PPCPseudoOps  
                structure Stream=PPCStream
		structure Shuffle = PPCShuffle)

structure PPCMCEmitter = 
  PPCMCEmitter(structure Instr=PPCInstr
	       structure PseudoOps=PPCPseudoOps
               structure Stream=PPCStream
	       structure CodeString=CodeString)

structure PPCMLTree = 
  MLTreeF(structure LabelExp=SMLNJLabelExp
	  structure Region=CPSRegions
	  structure Stream=PPCStream
	  structure Extension=SMLNJMLTreeExt

ViewVC Help
Powered by ViewVC 1.0.0