1/* Copyright (C) 2009 Free Software Foundation, Inc. 2 3 This file is free software; you can redistribute it and/or modify it under 4 the terms of the GNU General Public License as published by the Free 5 Software Foundation; either version 3 of the License, or (at your option) 6 any later version. 7 8 This file is distributed in the hope that it will be useful, but WITHOUT 9 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 10 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 11 for more details. 12 13 You should have received a copy of the GNU General Public License 14 along with this file; see the file COPYING3. If not see 15 <http://www.gnu.org/licenses/>. */ 16 17/* This is the same as ops1.c except for the compile option. 18 If you modify this code, please modify ops1.c as well. */ 19 20/* { dg-do compile } */ 21/* { dg-options "-O2 -std=gnu99 -pedantic-errors -mno-address-space-conversion" } */ 22 23#define __lm 24 25__ea int ea_var = 1; 26__lm int lm_var = 2; 27 28typedef __ea int *ea_ptr_t; 29typedef __lm int *lm_ptr_t; 30 31typedef __ea void *ea_vptr_t; 32typedef __lm void *lm_vptr_t; 33 34ea_ptr_t ea, ea2; 35lm_ptr_t lm, lm2; 36 37ea_vptr_t eav; 38lm_vptr_t lmv; 39 40extern void call_ea (ea_ptr_t); 41extern void call_lm (lm_ptr_t); 42 43/* Assignment, initialization, argument passing, and return. */ 44void to_ea (void) { ea = lm; } /* { dg-error "assignment from pointer to non-enclosed address space" } */ 45void to_lm (void) { lm = ea; } /* { dg-error "assignment from pointer to non-enclosed address space" } */ 46void init_ea (void) { ea_ptr_t l_ea = lm; } /* { dg-error "initialization from pointer to non-enclosed address space" } */ 47void init_lm (void) { lm_ptr_t l_lm = ea; } /* { dg-error "initialization from pointer to non-enclosed address space" } */ 48ea_ptr_t ret_ea (void) { return lm; } /* { dg-error "return from pointer to non-enclosed address space" } */ 49lm_ptr_t ret_lm (void) { return ea; } /* { dg-error "return from pointer to non-enclosed address space" } */ 50void call_ea2 (void) { call_ea (lm); } /* { dg-error "passing argument 1 of 'call_ea' from pointer to non-enclosed address space" } */ 51void call_lm2 (void) { call_lm (ea); } /* { dg-error "passing argument 1 of 'call_lm' from pointer to non-enclosed address space" } */ 52 53/* Explicit casts. */ 54void to_ea_with_cast (void) { ea = (ea_ptr_t)lm; } /* { dg-warning "cast to __ea address space pointer" } */ 55void to_lm_with_cast (void) { lm = (lm_ptr_t)ea; } /* { dg-warning "cast to generic address space pointer" } */ 56void init_ea_with_cast (void) { ea_ptr_t l_ea = (ea_ptr_t)lm; } /* { dg-warning "cast to __ea address space pointer" } */ 57void init_lm_with_cast (void) { lm_ptr_t l_lm = (lm_ptr_t)ea; } /* { dg-warning "cast to generic address space pointer" } */ 58ea_ptr_t ret_ea_with_cast (void) { return (ea_ptr_t)lm; } /* { dg-warning "cast to __ea address space pointer" } */ 59lm_ptr_t ret_lm_with_cast (void) { return (lm_ptr_t)ea; } /* { dg-warning "cast to generic address space pointer" } */ 60void call_ea2_with_cast (void) { call_ea ((ea_ptr_t)lm); } /* { dg-warning "cast to __ea address space pointer" } */ 61void call_lm2_with_cast (void) { call_lm ((lm_ptr_t)ea); } /* { dg-warning "cast to generic address space pointer" } */ 62 63/* Arithmetic operators. */ 64int sub_eaea (void) { return ea - ea2; } 65int sub_ealm (void) { return ea - lm2; } /* { dg-error "invalid operands to binary -" } */ 66int sub_lmea (void) { return lm - ea2; } /* { dg-error "invalid operands to binary -" } */ 67int sub_lmlm (void) { return lm - lm2; } 68ea_ptr_t if_eaea1 (int test) { return test? ea : ea2; } 69lm_ptr_t if_eaea2 (int test) { return test? ea : ea2; } /* { dg-error "return from pointer to non-enclosed address space" } */ 70ea_ptr_t if_ealm1 (int test) { return test? ea : lm2; } /* { dg-error "pointers to disjoint address spaces used in conditional expression" } */ 71lm_ptr_t if_ealm2 (int test) { return test? ea : lm2; } /* { dg-error "pointers to disjoint address spaces used in conditional expression" } */ 72ea_ptr_t if_lmea1 (int test) { return test? lm : ea2; } /* { dg-error "pointers to disjoint address spaces used in conditional expression" } */ 73lm_ptr_t if_lmea2 (int test) { return test? lm : ea2; } /* { dg-error "pointers to disjoint address spaces used in conditional expression" } */ 74ea_ptr_t if_lmlm1 (int test) { return test? lm : lm2; } /* { dg-error "return from pointer to non-enclosed address space" } */ 75lm_ptr_t if_lmlm2 (int test) { return test? lm : lm2; } 76 77/* Relational operators. */ 78int eq_eaea (void) { return ea == ea2; } 79int eq_ealm (void) { return ea == lm2; } /* { dg-error "comparison of pointers to disjoint address spaces" } */ 80int eq_lmea (void) { return lm == ea2; } /* { dg-error "comparison of pointers to disjoint address spaces" } */ 81int eq_lmlm (void) { return lm == lm2; } 82int lt_eaea (void) { return ea < ea2; } 83int lt_ealm (void) { return ea < lm2; } /* { dg-error "comparison of pointers to disjoint address spaces" } */ 84int lt_lmea (void) { return lm < ea2; } /* { dg-error "comparison of pointers to disjoint address spaces" } */ 85int lt_lmlm (void) { return lm < lm2; } 86 87/* Null pointer. */ 88void null_ea1 (void) { ea = 0; } 89void null_ea2 (void) { ea = (void *)0; } 90void null_ea3 (void) { ea = (__ea void *)0; } 91void null_lm1 (void) { lm = 0; } 92void null_lm2 (void) { lm = (void *)0; } 93void null_lm3 (void) { lm = (__ea void *)0; } /* { dg-error "assignment from pointer to non-enclosed address space" } */ 94 95