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 1115, Sun Mar 3 18:16:31 2002 UTC revision 1116, Tue Mar 5 23:17:18 2002 UTC
# Line 54  Line 54 
54         fun paren f = (emit "("; f(); emit ")")         fun paren f = (emit "("; f(); emit ")")
55         fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^"\n")         fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^"\n")
56         fun entryLabel lab = defineLabel lab         fun entryLabel lab = defineLabel lab
57         fun comment msg = (tab(); emit("/* " ^ msg ^ " */; nl()"))         fun comment msg = (tab(); emit("/* " ^ msg ^ " */"); nl())
58         fun annotation a = comment(Annotations.toString a)         fun annotation a = comment(Annotations.toString a)
59         fun getAnnotations() = error "getAnnotations"         fun getAnnotations() = error "getAnnotations"
60         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