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

Diff of /sml/trunk/src/MLRISC/ppc/emit/ppcAsm.sml

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

revision 1115, Sun Mar 3 18:16:31 2002 UTC revision 1116, Tue Mar 5 23:17:18 2002 UTC
# Line 51  Line 51 
51         fun paren f = (emit "("; f(); emit ")")         fun paren f = (emit "("; f(); emit ")")
52         fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^"\n")         fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^"\n")
53         fun entryLabel lab = defineLabel lab         fun entryLabel lab = defineLabel lab
54         fun comment msg = (tab(); emit("/* " ^ msg ^ " */; nl()"))         fun comment msg = (tab(); emit("/* " ^ msg ^ " */"); nl())
55         fun annotation a = comment(Annotations.toString a)         fun annotation a = comment(Annotations.toString a)
56         fun getAnnotations() = error "getAnnotations"         fun getAnnotations() = error "getAnnotations"
57         fun doNothing _ = ()         fun doNothing _ = ()

Legend:
Removed from v.1115  
changed lines
  Added in v.1116

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