]> git.ipfire.org Git - thirdparty/gcc.git/blame - gcc/fortran/iso-fortran-env.def
arith.c: Change copyright header to refer to version 3 of the GNU General Public...
[thirdparty/gcc.git] / gcc / fortran / iso-fortran-env.def
CommitLineData
d234d788 1/* Copyright (C) 2006, 2007 Free Software Foundation, Inc.
39f87c03
FXC
2
3This file is part of GCC.
4
5GCC is free software; you can redistribute it and/or modify it under
6the terms of the GNU General Public License as published by the Free
d234d788 7Software Foundation; either version 3, or (at your option) any later
39f87c03
FXC
8version.
9
10GCC is distributed in the hope that it will be useful, but WITHOUT ANY
11WARRANTY; without even the implied warranty of MERCHANTABILITY or
12FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
13for more details.
14
15You should have received a copy of the GNU General Public License
d234d788
NC
16along with GCC; see the file COPYING3. If not see
17<http://www.gnu.org/licenses/>. */
39f87c03
FXC
18
19/* This file contains the definition of the named integer constants provided
20 by the Fortran 2003 ISO_FORTRAN_ENV intrinsic module. */
21
22/* The arguments to NAMED_INTCST are:
23 -- an internal name
24 -- the symbol name in the module, as seen by Fortran code
25 -- the value it has */
26
27NAMED_INTCST (ISOFORTRANENV_CHARACTER_STORAGE_SIZE, "character_storage_size", \
28 gfc_character_storage_size)
29NAMED_INTCST (ISOFORTRANENV_ERROR_UNIT, "error_unit", 0)
30NAMED_INTCST (ISOFORTRANENV_FILE_STORAGE_SIZE, "file_storage_size", 8)
31NAMED_INTCST (ISOFORTRANENV_INPUT_UNIT, "input_unit", 5)
32NAMED_INTCST (ISOFORTRANENV_IOSTAT_END, "iostat_end", -1)
33NAMED_INTCST (ISOFORTRANENV_IOSTAT_EOR, "iostat_eor", -2)
34NAMED_INTCST (ISOFORTRANENV_NUMERIC_STORAGE_SIZE, "numeric_storage_size", \
35 gfc_numeric_storage_size)
36NAMED_INTCST (ISOFORTRANENV_OUTPUT_UNIT, "output_unit", 6)