URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [charset/] [builtin1.c] - Rev 816
Compare with Previous | Blame | View Log
/* isdigit(c) can be optimized to ((unsigned)c) - '0' <= 9, but only if we know the correct value of '0'. PR 18785. */ /* { dg-do run } */ /* { dg-require-iconv "IBM1047" } */ /* { dg-options "-O2 -fno-inline -fexec-charset=IBM1047" } */ extern int isdigit(int); extern void abort(void); static int str1(void) { return '1'; } static int strA(void) { return 'A'; } int main(void) { if (!isdigit('1')) abort(); if (isdigit('A')) abort(); if (!isdigit(str1())) abort(); if (isdigit(strA())) abort(); return 0; }