Diff of /sml/branches/SMLNJ/src/MLRISC/ppc/mltree/ppc.sml

Parent Directory | Revision Log | Patch

	revision 468, Wed Nov 10 22:42:52 1999 UTC	revision 469, Wed Nov 10 22:42:52 1999 UTC
#	Line 100	Line 100
100
101	fun selectInstructions	fun selectInstructions
102	(S.STREAM{emit,comment,	(S.STREAM{emit,comment,
103	defineLabel,entryLabel,blockName,pseudoOp,annotation,	defineLabel,entryLabel,pseudoOp,annotation,
104	beginCluster,endCluster,exitBlock,phi,alias,...}) =	beginCluster,endCluster,exitBlock,phi,alias,...}) =
105	let (* mark an instruction with annotations *)	let (* mark an instruction with annotations *)
106	fun mark'(instr,[]) = instr	fun mark'(instr,[]) = instr
#	Line 730	Line 730
730	pseudoOp     = pseudoOp,	pseudoOp     = pseudoOp,
731	defineLabel  = defineLabel,	defineLabel  = defineLabel,
732	entryLabel   = entryLabel,	entryLabel   = entryLabel,
	blockName    = blockName,
733	comment      = comment,	comment      = comment,
734	annotation   = annotation,	annotation   = annotation,
735	exitBlock    = exitBlock,	exitBlock    = exitBlock,

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.468   changed lines   Added in v.469

---

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