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/Tools/MDL/mdl-gen-asm.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/Tools/MDL/mdl-gen-asm.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 210  Line 210 
210            "    fun paren f = (emit \"(\"; f(); emit \")\")",            "    fun paren f = (emit \"(\"; f(); emit \")\")",
211            "    fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^\"\\n\")",            "    fun defineLabel lab = emit(P.Client.AsmPseudoOps.defineLabel lab^\"\\n\")",
212            "    fun entryLabel lab = defineLabel lab",            "    fun entryLabel lab = defineLabel lab",
213            "    fun comment msg = (tab(); emit(\"/* \" ^ msg ^ \" */; nl()\"))",            "    fun comment msg = (tab(); emit(\"/* \" ^ msg ^ \" */\"); nl())",
214            "    fun annotation a = comment(Annotations.toString a)",            "    fun annotation a = comment(Annotations.toString a)",
215            "    fun getAnnotations() = error \"getAnnotations\"",            "    fun getAnnotations() = error \"getAnnotations\"",
216            "    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