aboutsummaryrefslogtreecommitdiff
path: root/gcc/convert.c
diff options
context:
space:
mode:
authorJason Merrill <merrill@gnu.org>1995-02-13 13:24:42 +0000
committerJason Merrill <merrill@gnu.org>1995-02-13 13:24:42 +0000
commit98c76e3c9c879cdd6e1c8599b9196bbf86a20977 (patch)
tree5ad32c364d8cbe069e54331d0bc53d585f6bb527 /gcc/convert.c
parentf2f49259166ede7bdf8e83d528b82bd633aabb3a (diff)
downloadgcc-98c76e3c9c879cdd6e1c8599b9196bbf86a20977.zip
gcc-98c76e3c9c879cdd6e1c8599b9196bbf86a20977.tar.gz
gcc-98c76e3c9c879cdd6e1c8599b9196bbf86a20977.tar.bz2
Support reference types
From-SVN: r8922
Diffstat (limited to 'gcc/convert.c')
-rw-r--r--gcc/convert.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/convert.c b/gcc/convert.c
index 38a714f..5781630 100644
--- a/gcc/convert.c
+++ b/gcc/convert.c
@@ -26,9 +26,9 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "flags.h"
#include "convert.h"
-/* Convert EXPR to some pointer type TYPE.
+/* Convert EXPR to some pointer or reference type TYPE.
- EXPR must be pointer, integer, enumeral, or literal zero;
+ EXPR must be pointer, reference, integer, enumeral, or literal zero;
in other cases error is called. */
tree
@@ -45,7 +45,7 @@ convert_to_pointer (type, expr)
return expr;
}
- if (form == POINTER_TYPE)
+ if (form == POINTER_TYPE || form == REFERENCE_TYPE)
return build1 (NOP_EXPR, type, expr);
@@ -92,7 +92,7 @@ convert_to_real (type, expr)
return convert (type, fold (build1 (REALPART_EXPR,
TREE_TYPE (TREE_TYPE (expr)), expr)));
- if (form == POINTER_TYPE)
+ if (form == POINTER_TYPE || form == REFERENCE_TYPE)
error ("pointer value used where a floating point value was expected");
else
error ("aggregate value used where a float was expected");
@@ -120,7 +120,7 @@ convert_to_integer (type, expr)
register tree intype = TREE_TYPE (expr);
register enum tree_code form = TREE_CODE (intype);
- if (form == POINTER_TYPE)
+ if (form == POINTER_TYPE || form == REFERENCE_TYPE)
{
if (integer_zerop (expr))
expr = integer_zero_node;
@@ -449,7 +449,7 @@ convert_to_complex (type, expr)
}
}
- if (form == POINTER_TYPE)
+ if (form == POINTER_TYPE || form == REFERENCE_TYPE)
error ("pointer value used where a complex was expected");
else
error ("aggregate value used where a complex was expected");