URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [20030826-1.c] - Rev 149
Go to most recent revision | Compare with Previous | Blame | View Log
/* Copyright (C) 2003 Free Software Foundation. Check that constant folding of mathematical expressions doesn't break anything. Written by Roger Sayle, 24th August 2003. */ /* { dg-do run } */ /* { dg-options "-O2 -ffast-math" } */ void abort(void); double foo(double x) { return 12.0/(x*3.0); } double bar(double x) { return (3.0/x)*4.0; } int main() { if (foo(2.0) != 2.0) abort (); if (bar(2.0) != 6.0) abort (); return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log