diff options
author | arphaman <arphaman@gmail.com> | 2013-07-23 12:14:29 +0100 |
---|---|---|
committer | arphaman <arphaman@gmail.com> | 2013-07-23 12:14:29 +0100 |
commit | a8029a54dc709db908aea54cd9e605eb282cc325 (patch) | |
tree | e61bbcff246e264d8c2b6eabbca10856abe9a8ec /test/Parser | |
parent | b601cce438cabe2fd5cee91f05aaee9186e7a6e4 (diff) | |
download | flang-a8029a54dc709db908aea54cd9e605eb282cc325.tar.gz |
improved fixed-form squashed identifier support
Diffstat (limited to 'test/Parser')
-rw-r--r-- | test/Parser/fixedif.f | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test/Parser/fixedif.f b/test/Parser/fixedif.f new file mode 100644 index 0000000000..5d635b1e3d --- /dev/null +++ b/test/Parser/fixedif.f @@ -0,0 +1,14 @@ +* RUN: %flang -fsyntax-only %s +* RUN: %flang -fsyntax-only -ast-print %s 2>&1 | %file_check %s + PROGRAM iftest +* an implicit integer declaration. +* CHECK: ifatal = 0 + IFATAL = 0 +* an if statement + IF(.FALSE.)IFATAL=0 + IF(.true.)THEN + IFATAL=0 + ELSEIF(.false.)THEN + IFATAL=1 + ENDIF + END |