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 555, Fri Mar 3 16:10:30 2000 UTC revision 591, Mon Apr 3 01:19:20 2000 UTC
# Line 267  Line 267 
267            in  emit(MTLR(rs));            in  emit(MTLR(rs));
268                mark(I.BCLR{bo=I.ALWAYS,bf=CR0,bit=I.LT,LK=false,labels=labs},an)                mark(I.BCLR{bo=I.ALWAYS,bf=CR0,bit=I.LT,LK=false,labels=labs},an)
269            end            end
270          | stmt(T.CALL(rexp, flow, defs, uses, cdef, cuse, mem), an) =          | stmt(T.CALL{funct, targets, defs, uses, cdefs, cuses, region}, an) =
271            let val defs=cellset(defs)            let val defs=cellset(defs)
272                val uses=cellset(uses)                val uses=cellset(uses)
273             in emit(MTLR(expr rexp));             in emit(MTLR(expr funct));
274                mark(I.CALL{def=defs, use=uses, mem=mem}, an)                mark(I.CALL{def=defs, use=uses, mem=region}, an)
275             end             end
276          | stmt(T.RET flow,an) = mark(RET,an)          | stmt(T.RET flow,an) = mark(RET,an)
277          | stmt(T.STORE(ty,ea,data,mem),an) = store(ty,ea,data,mem,an)          | stmt(T.STORE(ty,ea,data,mem),an) = store(ty,ea,data,mem,an)

Legend:
Removed from v.555  
changed lines
  Added in v.591

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