diff options
| author | Gaurav Jain <gaurav@gauravjain.org> | 2014-04-17 22:04:35 -0400 |
|---|---|---|
| committer | Gaurav Jain <gaurav@gauravjain.org> | 2014-04-17 22:04:35 -0400 |
| commit | 9b44e016296ec1a1a43ffd513417d6d82c4ef35b (patch) | |
| tree | c623d4f8b812c3ab26901fd94b1414aa49228fc5 /tests/examplefiles/example.f90 | |
| parent | 84b7c8aca975566dde86fc90a23d49353e534265 (diff) | |
| download | pygments-9b44e016296ec1a1a43ffd513417d6d82c4ef35b.tar.gz | |
Add support for kind paramter for integer and real types
Integers and reals can have an optional kind parameter specified with an underscore. This could have the format of any variable name. Additionally added example file to demonstrate usage.
Diffstat (limited to 'tests/examplefiles/example.f90')
| -rw-r--r-- | tests/examplefiles/example.f90 | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/examplefiles/example.f90 b/tests/examplefiles/example.f90 new file mode 100644 index 00000000..40462189 --- /dev/null +++ b/tests/examplefiles/example.f90 @@ -0,0 +1,8 @@ +program main + integer, parameter :: mykind = selected_real_kind() + print *, 1 + print *, 1_mykind + print *, 1. + print *, 1._mykind + print *, (1., 1._mykind) +end program main |