diff options
| author | merrill <merrill@138bc75d-0d04-0410-961f-82ee72b054a4> | 1995-02-13 13:24:42 +0000 |
|---|---|---|
| committer | merrill <merrill@138bc75d-0d04-0410-961f-82ee72b054a4> | 1995-02-13 13:24:42 +0000 |
| commit | c9db69e7baaf688cbc3cc543a19c1da236996120 (patch) | |
| tree | 5ad32c364d8cbe069e54331d0bc53d585f6bb527 /gcc/convert.c | |
| parent | bec1df13ffaaf52c3a2fe8956f167f9f266beae6 (diff) | |
| download | gcc-c9db69e7baaf688cbc3cc543a19c1da236996120.tar.gz | |
Support reference types
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@8922 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/convert.c')
| -rw-r--r-- | gcc/convert.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/convert.c b/gcc/convert.c index 38a714f2043..57816301103 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"); |