# HG changeset patch
# User kono
# Date 1069670686 -32400
# Node ID b2a480be3c854522bd64246e68e89951057d1458
# Parent  b1297c82e926ba5e2ec2fcbc1e553a42735576d0
*** empty log message ***

diff -r b1297c82e926 -r b2a480be3c85 mc-parse.c
--- 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 ) */