diff options
| author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-08-19 06:38:29 +0000 |
|---|---|---|
| committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-08-19 06:38:29 +0000 |
| commit | 0f156b474f341794275de1527abf3434f1e66539 (patch) | |
| tree | e220ab496929434305dc41af3da62e7413d82a0b | |
| parent | deb9568d27445fe6327232e3c8f3955074cd2634 (diff) | |
| download | gcc-0f156b474f341794275de1527abf3434f1e66539.tar.gz | |
2009-08-19 Tobias Burnus <burnus@net-b.de>
PR fortran/41102
omp_lib.h.in: Fix -std=f95 errors.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@150931 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | libgomp/ChangeLog | 6 | ||||
| -rw-r--r-- | libgomp/omp_lib.h.in | 16 |
2 files changed, 14 insertions, 8 deletions
diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog index 1b0c12d1461..26ec0629062 100644 --- a/libgomp/ChangeLog +++ b/libgomp/ChangeLog @@ -1,3 +1,9 @@ +2009-08-19 Tobias Burnus <burnus@net-b.de> + + PR fortran/41102 + omp_lib.h.in: Fix -std=f95 errors. + + 2009-08-14 David Edelsohn <edelsohn@gnu.org> * testsuite/libgomp.graphite: Move from gcc.dg/graphite. diff --git a/libgomp/omp_lib.h.in b/libgomp/omp_lib.h.in index b42330bd383..2ff7a42fa8f 100644 --- a/libgomp/omp_lib.h.in +++ b/libgomp/omp_lib.h.in @@ -42,16 +42,16 @@ external omp_set_num_threads external omp_get_dynamic, omp_get_nested - logical*4 omp_get_dynamic, omp_get_nested + logical(4) omp_get_dynamic, omp_get_nested external omp_test_lock, omp_in_parallel - logical*4 omp_test_lock, omp_in_parallel + logical(4) omp_test_lock, omp_in_parallel external omp_get_max_threads, omp_get_num_procs - integer*4 omp_get_max_threads, omp_get_num_procs + integer(4) omp_get_max_threads, omp_get_num_procs external omp_get_num_threads, omp_get_thread_num - integer*4 omp_get_num_threads, omp_get_thread_num + integer(4) omp_get_num_threads, omp_get_thread_num external omp_test_nest_lock - integer*4 omp_test_nest_lock + integer(4) omp_test_nest_lock external omp_get_wtick, omp_get_wtime double precision omp_get_wtick, omp_get_wtime @@ -61,6 +61,6 @@ external omp_get_max_active_levels, omp_get_level external omp_get_ancestor_thread_num, omp_get_team_size external omp_get_active_level - integer*4 omp_get_thread_limit, omp_get_max_active_levels - integer*4 omp_get_level, omp_get_ancestor_thread_num - integer*4 omp_get_team_size, omp_get_active_level + integer(4) omp_get_thread_limit, omp_get_max_active_levels + integer(4) omp_get_level, omp_get_ancestor_thread_num + integer(4) omp_get_team_size, omp_get_active_level |