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/hppa/instructions/hppaProps.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/hppa/instructions/hppaProps.sml

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

revision 1333, Thu May 22 17:12:13 2003 UTC revision 1334, Thu May 22 22:46:30 2003 UTC
# Line 305  Line 305 
305     *========================================================================*)     *========================================================================*)
306    fun replicate(I.ANNOTATION{i,a}) = I.ANNOTATION{i=replicate i,a=a}    fun replicate(I.ANNOTATION{i,a}) = I.ANNOTATION{i=replicate i,a=a}
307      | replicate(I.COPY{k, sz, tmp=SOME _, dst, src}) =  let      | replicate(I.COPY{k, sz, tmp=SOME _, dst, src}) =  let
308            val tmp = case k of CB.GP => C.newReg() | CB.FP => C.newFreg()            val tmp = case k of CB.GP => C.newReg()
309                                | CB.FP => C.newFreg()
310                                | _ => error "replicate: neither GP nor FP"
311        in        in
312          I.COPY{k=k, sz=sz, tmp=SOME(I.Direct(tmp)), dst=dst, src=src}          I.COPY{k=k, sz=sz, tmp=SOME(I.Direct(tmp)), dst=dst, src=src}
313        end        end

Legend:
Removed from v.1333  
changed lines
  Added in v.1334

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