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

Diff of /sml/trunk/src/MLRISC/alpha/mltree/alpha.sml

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

revision 583, Thu Mar 23 21:52:30 2000 UTC revision 585, Wed Mar 29 23:55:35 2000 UTC
# Line 876  Line 876 
876    
877        (* generate a load byte with sign extension (page 4-48) *)        (* generate a load byte with sign extension (page 4-48) *)
878        and load8s(ea,rd,mem,an) =        and load8s(ea,rd,mem,an) =
879            if !byteWordLoadStores then loadSigned(I.LDBU,8,ea,rd,mem,an)            if !byteWordLoadStores then load(I.LDB,ea,rd,mem,an)
880            else loadSext(ea,rd,mem,1,I.EXTQH,56,an)            else loadSext(ea,rd,mem,1,I.EXTQH,56,an)
881    
882        (* generate a load 16 bit *)        (* generate a load 16 bit *)
# Line 886  Line 886 
886    
887        (* generate a load 16 bit with sign extension *)        (* generate a load 16 bit with sign extension *)
888        and load16s(ea,rd,mem,an) =        and load16s(ea,rd,mem,an) =
889            if !byteWordLoadStores then loadSigned(I.LDWU,16,ea,rd,mem,an)            if !byteWordLoadStores then load(I.LDW,ea,rd,mem,an)
890            else loadSext(ea,rd,mem,2,I.EXTQH,48,an)            else loadSext(ea,rd,mem,2,I.EXTQH,48,an)
891    
892        (* generate a load 32 bit with sign extension *)        (* generate a load 32 bit with sign extension *)
# Line 920  Line 920 
920    
921        (* generate a store byte *)        (* generate a store byte *)
922        and store8(ea,data,mem,an) =        and store8(ea,data,mem,an) =
923            storeUnaligned(ea,data,mem,I.INSBL,I.MSKBL,an)            if !byteWordLoadStores then store(I.STB, ea, data, mem, an)
924              else storeUnaligned(ea,data,mem,I.INSBL,I.MSKBL,an)
925    
926        (* generate a store16 *)        (* generate a store16 *)
927        and store16(ea,data,mem,an) =        and store16(ea,data,mem,an) =
928            storeUnaligned(ea,data,mem,I.INSWL,I.MSKWL,an)            if !byteWordLoadStores then store(I.STW, ea, data, mem, an)
929              else storeUnaligned(ea,data,mem,I.INSWL,I.MSKWL,an)
930    
931        (* generate conversion from floating point to integer *)        (* generate conversion from floating point to integer *)
932        and cvtf2i(pseudo,rounding,e,rd,an) =        and cvtf2i(pseudo,rounding,e,rd,an) =

Legend:
Removed from v.583  
changed lines
  Added in v.585

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