Skip to content

Commit e994efc

Browse files
committed
better identify debug flags
1 parent ff89069 commit e994efc

File tree

1 file changed

+3
-3
lines changed
  • example_packages/features_per_compiler/app

1 file changed

+3
-3
lines changed

example_packages/features_per_compiler/app/main.f90

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -25,15 +25,15 @@ program main
2525
print '(a)', ''
2626

2727
! Check for feature flags
28-
debug_active = index(options_str, '-g') > 0
28+
debug_active = index(options_str, ' -g ') > 0
2929
release_active = index(options_str, '-O3') > 0
3030
verbose_active = index(options_str, ' -v') > 0 .or. index(options_str, ' -v ') > 0
31-
fast_active = index(options_str, 'fast') > 0
31+
fast_active = index(options_str, 'fast') > 0
3232
strict_active = index(options_str, '-std=f2018') > 0 .or. index(options_str, '-stand f18') > 0
3333

3434
! Display active features
3535
print '(a)', 'Active features detected:'
36-
if (debug_active) print '(a)', ' ✓ DEBUG: -g flag found'
36+
if (debug_active) print '(a)', ' ✓ DEBUG: debug flags found'
3737
if (release_active) print '(a)', ' ✓ RELEASE: -O flags found'
3838
if (verbose_active) print '(a)', ' ✓ VERBOSE: -v flag found'
3939
if (fast_active) print '(a)', ' ✓ FAST: fast optimization flags found'

0 commit comments

Comments
 (0)