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/hppaRewrite.sml
ViewVC logotype

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

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

revision 93, Tue May 12 21:56:22 1998 UTC revision 106, Thu May 28 21:30:17 1998 UTC
# Line 26  Line 26 
26       | I.BCONDI{cmpi, bc, i, r2, t, f, n} =>       | I.BCONDI{cmpi, bc, i, r2, t, f, n} =>
27          I.BCONDI{cmpi=cmpi, bc=bc, i=i, r2=replc r2, t=t, f=f,n=n}          I.BCONDI{cmpi=cmpi, bc=bc, i=i, r2=replc r2, t=t, f=f,n=n}
28       | I.BV{x, b, labs, n} => I.BV{x=replc x, b=replc b, labs=labs,n=n}       | I.BV{x, b, labs, n} => I.BV{x=replc x, b=replc b, labs=labs,n=n}
29       | I.BLE{b, d, sr, t, defs, uses} =>       | I.BLE{b, d, sr, t, defs, uses=(i,f)} =>
30          I.BLE{b=replc b, d=d, sr=sr, t=t, defs=defs, uses=uses}          I.BLE{b=replc b, d=d, sr=sr, t=t, defs=defs, uses=(map replc i, f)}
31       | I.LDO{b, t, i} => I.LDO{b=replc b, t=t, i=i}       | I.LDO{b, t, i} => I.LDO{b=replc b, t=t, i=i}
32       | I.COPY{dst, src, tmp, impl} =>       | I.COPY{dst, src, tmp, impl} =>
33          I.COPY{dst=dst, src=map replc src, impl=impl, tmp=tmp}          I.COPY{dst=dst, src=map replc src, impl=impl, tmp=tmp}
# Line 56  Line 56 
56       | I.COMCLR{cc, r1, r2, t} => I.COMCLR{cc=cc, r1=r1, r2=r2, t=replc t}       | I.COMCLR{cc, r1, r2, t} => I.COMCLR{cc=cc, r1=r1, r2=r2, t=replc t}
57       | I.SHIFTV{sv, r, len, t} => I.SHIFTV{sv=sv, r=r, len=len, t=replc t}       | I.SHIFTV{sv, r, len, t} => I.SHIFTV{sv=sv, r=r, len=len, t=replc t}
58       | I.SHIFT{s, r, p, len, t} => I.SHIFT{s=s, r=r, p=p, len=len, t=replc t}       | I.SHIFT{s, r, p, len, t} => I.SHIFT{s=s, r=r, p=p, len=len, t=replc t}
59       | I.BLE{d, b, sr, t, defs, uses} =>       | I.BLE{d, b, sr, t, defs=(i,f), uses} =>
60          I.BLE{d=d, b=b, sr=sr, t=replc t, defs=defs, uses=uses}          I.BLE{d=d, b=b, sr=sr, t=replc t, defs=(map replc i, f), uses=uses}
61       | I.LDIL{i, t} => I.LDIL{i=i, t=replc t}       | I.LDIL{i, t} => I.LDIL{i=i, t=replc t}
62       | I.LDO{i, b, t} => I.LDO{i=i, b=b, t=replc t}       | I.LDO{i, b, t} => I.LDO{i=i, b=b, t=replc t}
63       | I.COPY{dst, src, impl, tmp} =>       | I.COPY{dst, src, impl, tmp} =>
# Line 79  Line 79 
79       | I.FCMP(fcc, f1, f2) => I.FCMP(fcc, replc f1, replc f2)       | I.FCMP(fcc, f1, f2) => I.FCMP(fcc, replc f1, replc f2)
80       | I.FCOPY{dst, src, tmp, impl} =>       | I.FCOPY{dst, src, tmp, impl} =>
81          I.FCOPY{dst=dst, src=map replc src, impl=impl, tmp=tmp}          I.FCOPY{dst=dst, src=map replc src, impl=impl, tmp=tmp}
82         | I.BLE{d, b, sr, t, defs=defs, uses=(i,f)} =>
83            I.BLE{d=d, b=b, sr=sr, t=replc t, defs=defs, uses=(i, map replc f)}
84       | _ => instr       | _ => instr
85      (*esac*)      (*esac*)
86    end    end
# Line 97  Line 99 
99       | I.FUNARY{fu, f, t} => I.FUNARY{fu=fu, f=f, t=replc t}       | I.FUNARY{fu, f, t} => I.FUNARY{fu=fu, f=f, t=replc t}
100       | I.FCOPY{dst, src, impl, tmp} =>       | I.FCOPY{dst, src, impl, tmp} =>
101          I.FCOPY{dst=map replc dst, src=src, impl=impl, tmp=ea tmp}          I.FCOPY{dst=map replc dst, src=src, impl=impl, tmp=ea tmp}
102         | I.BLE{d, b, sr, t, defs=(i,f), uses} =>
103            I.BLE{d=d, b=b, sr=sr, t=replc t, defs=(i, map replc f), uses=uses}
104       | _ => instr       | _ => instr
105      (*esac*)      (*esac*)
106    end    end
# Line 104  Line 108 
108    
109  (*  (*
110   * $Log: hppaRewrite.sml,v $   * $Log: hppaRewrite.sml,v $
111     * Revision 1.2  1998/05/08 10:54:00  george
112     *   The exhausted register has been made optional -- leung
113     *
114   * Revision 1.1.1.1  1998/04/08 18:39:01  george   * Revision 1.1.1.1  1998/04/08 18:39:01  george
115   * Version 110.5   * Version 110.5
116   *   *

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

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