1 /* classes: h_files */ 2 3 #ifndef SCM_OPTIONS_H 4 #define SCM_OPTIONS_H 5 6 /* Copyright (C) 1995,1996,2000,2001, 2006 Free Software Foundation, Inc. 7 * 8 * This library is free software; you can redistribute it and/or 9 * modify it under the terms of the GNU Lesser General Public 10 * License as published by the Free Software Foundation; either 11 * version 2.1 of the License, or (at your option) any later version. 12 * 13 * This library is distributed in the hope that it will be useful, 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 16 * Lesser General Public License for more details. 17 * 18 * You should have received a copy of the GNU Lesser General Public 19 * License along with this library; if not, write to the Free Software 20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA 21 */ 22 23 24 25 #include "libguile/__scm.h" 26 27 28 29 typedef struct scm_t_option 30 { 31 unsigned int type; 32 const char *name; 33 scm_t_bits val; 34 char *doc; 35 } scm_t_option; 36 37 38 #define SCM_OPTION_BOOLEAN 0 39 #define SCM_OPTION_INTEGER 1 40 #define SCM_OPTION_SCM 2 41 42 43 SCM_API SCM scm_options (SCM, scm_t_option [], unsigned int, const char*); 44 SCM_API void scm_init_opts (SCM (*) (SCM), scm_t_option [], unsigned int n); 45 SCM_API void scm_init_options (void); 46 47 #endif /* SCM_OPTIONS_H */ 48 49 /* 50 Local Variables: 51 c-file-style: "gnu" 52 End: 53 */ 54