Mercurial > hg > CbC > old > device
changeset 169:b2a480be3c85
*** empty log message ***
author | kono |
---|---|
date | Mon, 24 Nov 2003 19:44:46 +0900 |
parents | b1297c82e926 |
children | 6e0f67b7d200 |
files | mc-parse.c |
diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/mc-parse.c Mon Nov 24 19:14:45 2003 +0900 +++ b/mc-parse.c Mon Nov 24 19:44:46 2003 +0900 @@ -879,13 +879,20 @@ } fnptr->dsp=list4(type,fnptr->dsp,(int)n,0); n->sc = LVAR; - if(type==CHAR) { + if(type==CHAR||type==UCHAR) { if (n->dsp==0) { n->dsp = args; if (endian) n->dsp += size_of_int-1; } args += size_of_int; + } else if(type==SHORT||type==USHORT) { + if (n->dsp==0) { + n->dsp = args; + if (endian) + n->dsp += size_of_int-size_of_short; + } + args += size_of_int; } else { /* if (n->dsp==0) (argument list in ADECL is useless, type list can be found in type ) */