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

Diff of /sml/trunk/src/MLRISC/x86/emit/x86Asm.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 57  Line 57 
57         fun paren f = (emit "("; f(); emit ")")         fun paren f = (emit "("; f(); emit ")")
58         fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^"\n")         fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^"\n")
59         fun entryLabel lab = defineLabel lab         fun entryLabel lab = defineLabel lab
60         fun comment msg = (tab(); emit("/* " ^ msg ^ " */; nl()"))         fun comment msg = (tab(); emit("/* " ^ msg ^ " */"); nl())
61         fun annotation a = comment(Annotations.toString a)         fun annotation a = comment(Annotations.toString a)
62         fun getAnnotations() = error "getAnnotations"         fun getAnnotations() = error "getAnnotations"
63         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