1 ; Copyright (C) 2009-2018 Free Software Foundation, Inc.
3 ; This file is part of GCC.
5 ; GCC is free software; you can redistribute it and/or modify it under
6 ; the terms of the GNU General Public License as published by the Free
7 ; Software Foundation; either version 3, or (at your option) any later
10 ; GCC is distributed in the hope that it will be useful, but WITHOUT ANY
11 ; WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 ; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 ; You should have received a copy of the GNU General Public License
16 ; along with GCC; see the file COPYING3. If not see
17 ; <http://www.gnu.org/licenses/>.
26 Target Report Var(flag_vms_malloc64) Init(1)
27 Malloc data into P2 space.
30 Target RejectNegative Joined Var(vms_debug_main)
31 Set name of main routine for the debugger.
34 Target Report Var(flag_vms_return_codes)
35 Use VMS exit codes instead of posix ones.
38 Target Joined Report RejectNegative Enum(vms_pointer_size) Var(flag_vms_pointer_size) Init(VMS_POINTER_SIZE_NONE)
39 -mpointer-size=[no,32,short,64,long] Set the default pointer size.
42 Name(vms_pointer_size) Type(enum vms_pointer_size) UnknownError(unknown pointer size model %qs)
45 Enum(vms_pointer_size) String(no) Value(VMS_POINTER_SIZE_NONE)
48 Enum(vms_pointer_size) String(32) Value(VMS_POINTER_SIZE_32)
51 Enum(vms_pointer_size) String(short) Value(VMS_POINTER_SIZE_32)
54 Enum(vms_pointer_size) String(64) Value(VMS_POINTER_SIZE_64)
57 Enum(vms_pointer_size) String(long) Value(VMS_POINTER_SIZE_64)
59 ; The float representation format in effect for Ada
61 char vms_float_format = 'I'
63 ; This comment is to ensure we retain the blank line above.