- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
What is the continuation indicator for OpenMP for free source (E.g. for F2003 it is &) ?
I like to a DEFAULT(NONE) on my OpenMP loops. This way compiler warns me if I missed any variables for an OpenMP parallel section.
How can I avoid this ?
I like to a DEFAULT(NONE) on my OpenMP loops. This way compiler warns me if I missed any variables for an OpenMP parallel section.
[bash]!$OMP PARALLEL DO PRIVATE(maxvalue,minvalue,maxloca,minloca) SHARED(nnodes,ndir,motiontstps,motiontinc,motionaccelth,zpa,zpaloc) DEFAULT(NONE) ! do loop goes here !$OMP END PARALLEL DO [/bash]However, I am getting the copiler warning for F2003 checking.
[bash]warning #5268: Extension to standard: The text exceeds right hand column allowed on the line.[/bash]
How can I avoid this ?
1 Solution
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
OMP directives can be continued. In free-form source, you add the & at the end of the line to be continued and insert the "sentinel" at the beginning of the continued line.
[fortran]!$OMP PARALLEL DO PRIVATE(maxvalue,minvalue,maxloca,minloca) & !$OMP SHARED(nnodes,ndir,motiontstps,motiontinc,motionaccelth,zpa,zpaloc) DEFAULT(NONE) [/fortran]
Link Copied
2 Replies
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
OMP directives can be continued. In free-form source, you add the & at the end of the line to be continued and insert the "sentinel" at the beginning of the continued line.
[fortran]!$OMP PARALLEL DO PRIVATE(maxvalue,minvalue,maxloca,minloca) & !$OMP SHARED(nnodes,ndir,motiontstps,motiontinc,motionaccelth,zpa,zpaloc) DEFAULT(NONE) [/fortran]
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Thanks for the prompt response.
Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page