OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
PR c++/53549
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
g++.dg
/
torture
/
pr41273.C
1
/* { dg-do compile } */
2
/* { dg-options "-g" } */
3
4
long *H2_ipX_ener_sort;
5
double H2_old_populations[2];
6
double H2_total;
7
8
void H2_LevelPops()
9
{
10
double sum_pop = 0.;
11
long nEner = 0;
12
while( nEner < 3 && sum_pop/H2_total < 0.99999 )
13
{
14
long ip = H2_ipX_ener_sort[nEner];
15
sum_pop += H2_old_populations[ip];
16
++nEner;
17
}
18
}