diff options
| author | arphaman <arphaman@gmail.com> | 2013-09-09 18:55:28 +0100 |
|---|---|---|
| committer | arphaman <arphaman@gmail.com> | 2013-09-09 18:55:28 +0100 |
| commit | 55854b6d7f4d02facf29a45a78e61ff409ef9e56 (patch) | |
| tree | 7feda758740312e0ff2e21f81e70a6f63cec03a3 /test/Parser | |
| parent | c2e0657c153878da0d19e090226865708d773360 (diff) | |
| download | flang-55854b6d7f4d02facf29a45a78e61ff409ef9e56.tar.gz | |
added parsing for type decl spec
Diffstat (limited to 'test/Parser')
| -rw-r--r-- | test/Parser/type.f95 | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/test/Parser/type.f95 b/test/Parser/type.f95 index f2d425f003..c9e78d281c 100644 --- a/test/Parser/type.f95 +++ b/test/Parser/type.f95 @@ -35,6 +35,12 @@ PROGRAM typetest character*10 :: p*10 ! expected-error {{duplicate character length declaration specifier}} end type + type(Point) p1, p2 + type(sphere) sp + + type( ! expected-error {{expected identifier}} + type(ping x ! expected-error {{expected ')'}} + type params ! expected-note {{to match this 'type'}} integer i i = 22 ! expected-error {{expected 'end type'}} |