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/branches/SMLNJ/src/MLRISC/hppa/hppaMC.sml
ViewVC logotype

Diff of /sml/branches/SMLNJ/src/MLRISC/hppa/hppaMC.sml

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

sml/trunk/src/MLRISC/hppa/hppaMC.sml revision 16, Wed Mar 11 21:00:04 1998 UTC sml/branches/SMLNJ/src/MLRISC/hppa/hppaMC.sml revision 106, Thu May 28 21:30:17 1998 UTC
# Line 187  Line 187 
187        (emitWord((opcode << 0w10) ++ (itow b << 0w5) ++ r);        (emitWord((opcode << 0w10) ++ (itow b << 0w5) ++ r);
188         emitWord((rv << 0w13) ++ (ext8 << 0w5) ++ t))         emitWord((rv << 0w13) ++ (ext8 << 0w5) ++ t))
189    
190      fun fcond I.LT = 0w9      fun fcond I.?    = 0w2
191        | fcond I.LE = 0w13        | fcond I.!<=> = 0w3
192        | fcond I.EQ = 0w4        | fcond I.==   = 0w4
193        | fcond I.NE = 0w26        | fcond I.?=   = 0w6
194        | fcond I.GE = 0w21        | fcond I.!<>  = 0w7
195        | fcond I.GT = 0w17        | fcond I.!?>= = 0w8
       | fcond _ = error ""  
   
     fun fcond I.==   = 0w4  
       | fcond I.!=   = 0w26  
       | fcond I.?    = 0w2  
       | fcond I.<=>  = 0w29  
       | fcond I.>    = 0w17  
       | fcond I.>=   = 0w21  
       | fcond I.?>   = 0w18  
       | fcond I.?>=  = 0w22  
196        | fcond I.<    = 0w9        | fcond I.<    = 0w9
       | fcond I.<=   = 0w13  
197        | fcond I.?<   = 0w10        | fcond I.?<   = 0w10
198          | fcond I.!>=  = 0w11
199          | fcond I.!?>  = 0w12
200          | fcond I.<=   = 0w13
201        | fcond I.?<=  = 0w14        | fcond I.?<=  = 0w14
202          | fcond I.!>   = 0w15
203          | fcond I.!?<= = 0w16
204          | fcond I.>    = 0w17
205          | fcond I.?>   = 0w18
206          | fcond I.!<=  = 0w19
207          | fcond I.!?<  = 0w20
208          | fcond I.>=   = 0w21
209          | fcond I.?>=  = 0w22
210          | fcond I.!<   = 0w23
211          | fcond I.!?=  = 0w24
212        | fcond I.<>   = 0w25        | fcond I.<>   = 0w25
213        | fcond I.?=   = 0w6        | fcond I.!=   = 0w26
214          | fcond I.!?   = 0w28
215          | fcond I.<=>  = 0w29
216    
217      fun cmpCond I.EQ  = (0w1, 0w0)      fun cmpCond I.EQ  = (0w1, 0w0)
218        | cmpCond I.LT  = (0w2, 0w0)        | cmpCond I.LT  = (0w2, 0w0)
# Line 355  Line 359 
359    
360  (*  (*
361   * $Log: hppaMC.sml,v $   * $Log: hppaMC.sml,v $
362   * Revision 1.6  1998/02/17 02:51:15  george   * Revision 1.2  1998/05/19 15:45:29  george
363   *   Added the nullify bit to all branch instructions -- leunga   *   Introduced the full set of IEEE comparision operators.
  *  
  * Revision 1.5  1998/02/15 19:39:33  jhr  
  *   Deleted unused references to System.Tags.  
364   *   *
365   * Revision 1.4  1997/09/29 20:58:35  george   * Revision 1.1.1.1  1998/04/08 18:39:01  george
366   *   Propagate region information through instruction set   * Version 110.5
367   *   *
 # Revision 1.3  1997/07/17  12:27:48  george  
 #   The regmap is now represented as an int map rather than using arrays.  
 #  
 # Revision 1.2  1997/04/19  18:39:11  george  
 # Version 109.27  
 #  
 # Revision 1.1.1.1  1997/04/19  18:14:23  george  
 #   Version 109.27  
 #  
368   *)   *)

Legend:
Removed from v.16  
changed lines
  Added in v.106

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