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/c-calls/ppc-macosx.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/ppc/c-calls/ppc-macosx.sml

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

revision 1531, Mon Jul 12 19:44:50 2004 UTC revision 1532, Tue Jul 13 03:49:10 2004 UTC
# Line 343  Line 343 
343                    | addArgReg ((Args locs')::locs, argRegs) =                    | addArgReg ((Args locs')::locs, argRegs) =
344                        addArgReg (locs, addArgReg(locs', argRegs))                        addArgReg (locs, addArgReg(locs', argRegs))
345                    | addArgReg (_::locs, argRegs) = addArgReg(locs, argRegs)                    | addArgReg (_::locs, argRegs) = addArgReg(locs, argRegs)
346                      | addArgReg ([], argRegs) = rev argRegs
347                  val argRegs = addArgReg (locs, [])                  val argRegs = addArgReg (locs, [])
348                  in                  in
349                    (argRegs, linkReg :: callerSaveRegs)                    (argRegs, linkReg :: callerSaveRegs)

Legend:
Removed from v.1531  
changed lines
  Added in v.1532

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