1 /* params.c - Run-time parameters.
2 Copyright (C) 2001, 2003, 2004, 2005, 2007, 2008
3 Free Software Foundation, Inc.
4 Written by Mark Mitchell <mark@codesourcery.com>.
6 This file is part of GCC.
8 GCC is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 3, or (at your option) any later
13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
24 #include "coretypes.h"
29 /* An array containing the compiler parameters and their current
32 param_info
*compiler_params
;
34 /* The number of entries in the table. */
35 /* Changed for FICI0: access to list of compiler parameters */
36 size_t num_compiler_params
;
38 /* Add the N PARAMS to the current list of compiler parameters. */
41 add_params (const param_info params
[], size_t n
)
43 /* Allocate enough space for the new parameters. */
44 compiler_params
= XRESIZEVEC (param_info
, compiler_params
,
45 num_compiler_params
+ n
);
46 /* Copy them into the table. */
47 memcpy (compiler_params
+ num_compiler_params
,
49 n
* sizeof (param_info
));
50 /* Keep track of how many parameters we have. */
51 num_compiler_params
+= n
;
54 /* Set the VALUE associated with the parameter given by NAME. */
57 set_param_value (const char *name
, int value
)
61 /* Make sure nobody tries to set a parameter to an invalid value. */
62 gcc_assert (value
!= INVALID_PARAM_VAL
);
64 /* Scan the parameter table to find a matching entry. */
65 for (i
= 0; i
< num_compiler_params
; ++i
)
66 if (strcmp (compiler_params
[i
].option
, name
) == 0)
68 if (value
< compiler_params
[i
].min_value
)
69 error ("minimum value of parameter %qs is %u",
70 compiler_params
[i
].option
,
71 compiler_params
[i
].min_value
);
72 else if (compiler_params
[i
].max_value
> compiler_params
[i
].min_value
73 && value
> compiler_params
[i
].max_value
)
74 error ("maximum value of parameter %qs is %u",
75 compiler_params
[i
].option
,
76 compiler_params
[i
].max_value
);
79 compiler_params
[i
].value
= value
;
80 compiler_params
[i
].set
= true;
85 /* If we didn't find this parameter, issue an error message. */
86 error ("invalid parameter %qs", name
);