diff options
| author | arphaman <arphaman@gmail.com> | 2013-07-25 15:10:31 +0100 |
|---|---|---|
| committer | arphaman <arphaman@gmail.com> | 2013-07-25 15:10:31 +0100 |
| commit | 1eb7a072852d80990629ea0c3ed5247a10a8ad5f (patch) | |
| tree | 0d0d85bf52c65ac3d02eba4bc19bf7098b099de2 /test/Parser | |
| parent | 05269545bea0e8500308b7dd3feea78a6478a5f7 (diff) | |
| download | flang-1eb7a072852d80990629ea0c3ed5247a10a8ad5f.tar.gz | |
partially fixed fixed-form functin declaration parsing
Diffstat (limited to 'test/Parser')
| -rw-r--r-- | test/Parser/fixedFormFunction.f | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test/Parser/fixedFormFunction.f b/test/Parser/fixedFormFunction.f new file mode 100644 index 0000000000..ed16bfa94b --- /dev/null +++ b/test/Parser/fixedFormFunction.f @@ -0,0 +1,14 @@ +* RUN: %flang -fsyntax-only %s +* RUN: %flang -fsyntax-only -ast-print %s 2>&1 | %file_check %s + LOGICALFUNCTIONFOO() +* CHECK: foo = .false. + FOO = .false. + RETURN + END + +* FIXME!!! + LOGICAL(2)FUNCTIONBAR() +* CHECK: bar = logical(.true.,Kind=2) + BAR = .true. + RETURN + END |