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/x86/c-calls/ia32-svid.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/x86/c-calls/ia32-svid.sml

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

revision 807, Sat Apr 14 02:39:01 2001 UTC revision 808, Wed Apr 18 15:43:09 2001 UTC
# Line 221  Line 221 
221                                  | Ty.C_long_double => fload(80, 10)                                  | Ty.C_long_double => fload(80, 10)
222                                  | Ty.C_unsigned(cint) => load(intSz(cint))                                  | Ty.C_unsigned(cint) => load(intSz(cint))
223                                  | Ty.C_signed(cint) => load(intSz(cint))                                  | Ty.C_signed(cint) => load(intSz(cint))
224                                  | Ty.C_PTR => load(32, 8)                                  | Ty.C_PTR => load(32, 4)
225                                  | Ty.C_ARRAY _ => load(32, 8)                                  | Ty.C_ARRAY _ => load(32, 4)
226                                  | Ty.C_STRUCT fields => let                                  | Ty.C_STRUCT fields => let
227                                        val (i, args) = mkArgs(fields, i, [])                                        val (i, args) = mkArgs(fields, i, [])
228                                    in mkArgs(rest, i, ARGS args::acc)                                    in mkArgs(rest, i, ARGS args::acc)

Legend:
Removed from v.807  
changed lines
  Added in v.808

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