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/sparc/emit/sparcAsm.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/sparc/emit/sparcAsm.sml

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

revision 814, Tue May 1 15:44:45 2001 UTC revision 815, Fri May 4 05:09:10 2001 UTC
# Line 53  Line 53 
53         fun entryLabel lab = defineLabel lab         fun entryLabel lab = defineLabel lab
54         fun comment msg = (tab(); emit("/* " ^ msg ^ " */"))         fun comment msg = (tab(); emit("/* " ^ msg ^ " */"))
55         fun annotation a = (comment(Annotations.toString a); nl())         fun annotation a = (comment(Annotations.toString a); nl())
56           fun getAnnotations() = error "getAnnotations"
57         fun doNothing _ = ()         fun doNothing _ = ()
58         fun emit_region mem = comment(I.Region.toString mem)         fun emit_region mem = comment(I.Region.toString mem)
59         val emit_region =         val emit_region =
# Line 578  Line 579 
579                  entryLabel=entryLabel,                  entryLabel=entryLabel,
580                  comment=comment,                  comment=comment,
581                  exitBlock=doNothing,                  exitBlock=doNothing,
582                  annotation=annotation                  annotation=annotation,
583                    getAnnotations=getAnnotations
584                 }                 }
585     end     end
586  end  end

Legend:
Removed from v.814  
changed lines
  Added in v.815

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