# HG changeset patch
# User Frits van Bommel <fvbommel wxs.nl>
# Date 1238286570 -3600
# Node ID 226c07c71967ce97067396c6df3b8fc442e1d416
# Parent  166042b48c28a0d0eb7ed40aff36d25db11a4d03
This should fix integers below 64 bit on big-endian systems.

diff -r 166042b48c28 -r 226c07c71967 dmd/lexer.c
--- a/dmd/lexer.c	Sat Mar 28 21:10:53 2009 +0100
+++ b/dmd/lexer.c	Sun Mar 29 01:29:30 2009 +0100
@@ -118,22 +118,14 @@
     switch (value)
     {
 	case TOKint32v:
-#if IN_GCC
 	    sprintf(buffer,"%d",(d_int32)int64value);
-#else
-	    sprintf(buffer,"%d",int32value);
-#endif
 	    break;
 
 	case TOKuns32v:
 	case TOKcharv:
 	case TOKwcharv:
 	case TOKdcharv:
-#if IN_GCC
 	    sprintf(buffer,"%uU",(d_uns32)uns64value);
-#else
-	    sprintf(buffer,"%uU",uns32value);
-#endif
 	    break;
 
 	case TOKint64v:
diff -r 166042b48c28 -r 226c07c71967 dmd/lexer.h
--- a/dmd/lexer.h	Sat Mar 28 21:10:53 2009 +0100
+++ b/dmd/lexer.h	Sun Mar 29 01:29:30 2009 +0100
@@ -217,8 +217,6 @@
     union
     {
 	// Integers
-	d_int32 int32value;
-	d_uns32	uns32value;
 	d_int64	int64value;
 	d_uns64	uns64value;
 
diff -r 166042b48c28 -r 226c07c71967 dmd/parse.c
--- a/dmd/parse.c	Sat Mar 28 21:10:53 2009 +0100
+++ b/dmd/parse.c	Sun Mar 29 01:29:30 2009 +0100
@@ -3985,12 +3985,12 @@
 	    break;
 
 	case TOKint32v:
-	    e = new IntegerExp(loc, token.int32value, Type::tint32);
+	    e = new IntegerExp(loc, (d_int32)token.int64value, Type::tint32);
 	    nextToken();
 	    break;
 
 	case TOKuns32v:
-	    e = new IntegerExp(loc, token.uns32value, Type::tuns32);
+	    e = new IntegerExp(loc, (d_uns32)token.uns64value, Type::tuns32);
 	    nextToken();
 	    break;
 
@@ -4064,17 +4064,17 @@
 	    break;
 
 	case TOKcharv:
-	    e = new IntegerExp(loc, token.uns32value, Type::tchar);
+	    e = new IntegerExp(loc, (d_uns8)token.uns64value, Type::tchar);
 	    nextToken();
 	    break;
 
 	case TOKwcharv:
-	    e = new IntegerExp(loc, token.uns32value, Type::twchar);
+	    e = new IntegerExp(loc, (d_uns16)token.uns64value, Type::twchar);
 	    nextToken();
 	    break;
 
 	case TOKdcharv:
-	    e = new IntegerExp(loc, token.uns32value, Type::tdchar);
+	    e = new IntegerExp(loc, (d_uns32)token.uns64value, Type::tdchar);
 	    nextToken();
 	    break;