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/hppa.mdl
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/hppa/hppa.mdl

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

revision 983, Wed Nov 21 18:44:55 2001 UTC revision 984, Wed Nov 21 19:00:08 2001 UTC
# Line 650  Line 650 
650            fun lo11 n  = (itow n) && 0wx7ff            fun lo11 n  = (itow n) && 0wx7ff
651            (* BUG: should respect the field selectors instead of ignoring them *)            (* BUG: should respect the field selectors instead of ignoring them *)
652        in  case opnd of        in  case opnd of
653              I.HILabExp(lexp, _) => hi21X(LabelExp.valueOf lexp)              I.HILabExp(lexp, _) => hi21X(MLTreeEval.valueOf lexp)
654            | I.LOLabExp(lexp, _) => lo11(LabelExp.valueOf lexp)            | I.LOLabExp(lexp, _) => lo11(MLTreeEval.valueOf lexp)
655            | I.LabExp(lexp, _)   => itow(LabelExp.valueOf lexp)            | I.LabExp(lexp, _)   => itow(MLTreeEval.valueOf lexp)
656            | I.IMMED i           => itow i            | I.IMMED i           => itow i
657            | I.REG _             => error "REG"            | I.REG _             => error "REG"
658        end        end
# Line 969  Line 969 
969                   Label.setAddr(tmpLab, !loc+4);                   Label.setAddr(tmpLab, !loc+4);
970                   branchLink(0wx3a,tmp,tmpLab,0w0,n);                   branchLink(0wx3a,tmp,tmpLab,0w0,n);
971                   LongImmed{Op=0wxa,r=tmp,                   LongImmed{Op=0wxa,r=tmp,
972                             im21=assemble_21(itow(LabelExp.valueOf offset))};                             im21=assemble_21(itow(MLTreeEval.valueOf offset))};
973                   BranchVectored{Op=0wx3a,t=tmp,x=zeroR,ext3=0w6,n=n}                   BranchVectored{Op=0wx3a,t=tmp,x=zeroR,ext3=0w6,n=n}
974               end               end
975          rtl: ``B''          rtl: ``B''

Legend:
Removed from v.983  
changed lines
  Added in v.984

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