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/instructions/sparccomp-instr-ext.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/sparc/instructions/sparccomp-instr-ext.sml

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

revision 1002, Fri Nov 30 17:11:33 2001 UTC revision 1003, Fri Dec 7 02:45:32 2001 UTC
# Line 49  Line 49 
49      fun compileSext reducer { stm: stm, an: T.an list } = let      fun compileSext reducer { stm: stm, an: T.an list } = let
50          val TS.REDUCER { emit, ... } = reducer          val TS.REDUCER { emit, ... } = reducer
51      in      in
52          case stm of X.UNIMP i => emit (I.UNIMP {const22 = i}, an)          case stm of X.UNIMP i => emit (I.unimp {const22 = i}, an)
53      end      end
54  end  end

Legend:
Removed from v.1002  
changed lines
  Added in v.1003

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