summaryrefslogtreecommitdiff
path: root/lang/gpc/files/patch-ac
blob: 32b12cc475b7de37494dd99044e34fe30e2e1221 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
*** convert.c.orig	Thu Aug  7 13:44:17 1997
--- convert.c		Thu Mar 23 14:54:56 2000
***************
*** 288,294 ****
--- 288,299 ----
  
  		/* Can't do arithmetic in enumeral types
  		   so use an integer type that will hold the values.  */
+ #ifdef GPC
+               if (TREE_CODE (typex) == ENUMERAL_TYPE
+                   || TREE_CODE (typex) == BOOLEAN_TYPE)
+ #else /* not GPC */
  		if (TREE_CODE (typex) == ENUMERAL_TYPE)
+ #endif /* not GPC */
  		  typex = type_for_size (TYPE_PRECISION (typex),
  					 TREE_UNSIGNED (typex));
  
***************
*** 326,332 ****
--- 331,343 ----
  
  	    /* Can't do arithmetic in enumeral types
  	       so use an integer type that will hold the values.  */
+ #ifdef GPC
+           if (TREE_CODE (typex) == ENUMERAL_TYPE
+               || TREE_CODE (typex) == CHAR_TYPE
+               || TREE_CODE (typex) == BOOLEAN_TYPE)
+ #else /* not GPC */
  	    if (TREE_CODE (typex) == ENUMERAL_TYPE)
+ #endif /* not GPC */
  	      typex = type_for_size (TYPE_PRECISION (typex),
  				     TREE_UNSIGNED (typex));