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 /MLRISC/trunk/x86/staged-allocation/test-varargs.c
ViewVC logotype

Diff of /MLRISC/trunk/x86/staged-allocation/test-varargs.c

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

revision 3062, Wed Jun 4 06:59:52 2008 UTC revision 3063, Thu Jun 5 00:42:15 2008 UTC
# Line 33  Line 33 
33    
34  }  }
35    
36  #define N_ARGS 2  #define N_ARGS 1
37  #define STK 2  #define STK 2
38  #define FSTK 3  #define FSTK 3
39  #define OFF(i) (i*4)  #define OFF(i) (i*4)
# Line 61  Line 61 
61    args[0]->hd->kind = (long long)STK;    args[0]->hd->kind = (long long)STK;
62    args[0]->hd->loc = (long long)OFF(0);    args[0]->hd->loc = (long long)OFF(0);
63    args[0]->hd->ty = (long long)32;    args[0]->hd->ty = (long long)32;
64      /*
65    args[1]->hd = NEW(zipped_arg_t);    args[1]->hd = NEW(zipped_arg_t);
66    args[1]->hd->val = (long long)69;    args[1]->hd->val = (long long)69;
67    args[1]->hd->kind = (long long)STK;    args[1]->hd->kind = (long long)STK;
68    args[1]->hd->loc = (long long)OFF(1);    args[1]->hd->loc = (long long)OFF(1);
69    args[1]->hd->ty = (long long)32;    args[1]->hd->ty = (long long)32;
70      */
71    
72    varargs(Say, args[0], 16);    varargs(Say, args[0], alignb(N_ARGS));
73    
74    return 0;    return 0;
75  }  }

Legend:
Removed from v.3062  
changed lines
  Added in v.3063

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