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/branches/SMLNJ/src/compiler/CodeGen/ppc/ppcMLTree.sml
ViewVC logotype

View of /sml/branches/SMLNJ/src/compiler/CodeGen/ppc/ppcMLTree.sml

Parent Directory Parent Directory | Revision Log Revision Log

Revision 429 - (download) (annotate)
Wed Sep 8 09:47:00 1999 UTC (20 years, 3 months ago) by monnier
File size: 1220 byte(s)
version 110.21
(* COPYRIGHT (c) 1999 Lucent Technologies, Bell Labs. *)

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

(* specialised powerpc instruction set *)
structure PPCInstr = 
  PPCInstr(structure Const=PPCConst
	   structure Region=CPSRegions)

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 B=FunctionNames)

structure PPCStream = 
  InstructionStreamFn(structure P=PPCPseudoOps
                      structure B=FunctionNames)

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 Const=PPCConst
	  structure R=CPSRegions
	  structure S=PPCStream
          type rextension=unit
          type fextension=unit)

ViewVC Help
Powered by ViewVC 1.0.0