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/compiler/CodeGen/main/machine-gen.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/CodeGen/main/machine-gen.sml

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

revision 837, Fri Jun 1 17:27:54 2001 UTC revision 838, Tue Jun 5 19:10:21 2001 UTC
# Line 47  Line 47 
47    
48     fun omitFramePointer(cluster as F.CLUSTER{annotations, ...}) =     fun omitFramePointer(cluster as F.CLUSTER{annotations, ...}) =
49       if #contains MLRiscAnnotations.USES_VIRTUAL_FRAME_POINTER (!annotations) then       if #contains MLRiscAnnotations.USES_VIRTUAL_FRAME_POINTER (!annotations) then
50          (print "calling omit frame pointer \n";          (OmitFramePtr.omitframeptr
51           OmitFramePtr.omitframeptr{vfp=CpsRegs.vfp, cl=cluster, idelta=SOME 0:Int32.int option};               {vfp=CpsRegs.vfp, cl=cluster, idelta=SOME 0:Int32.int option};
52           cluster)           cluster)
53       else cluster       else cluster
54    

Legend:
Removed from v.837  
changed lines
  Added in v.838

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