~ubuntu-branches/ubuntu/trusty/mit-scheme/trusty-proposed

« back to all changes in this revision

Viewing changes to src/microcode/comlin.h

  • Committer: Bazaar Package Importer
  • Author(s): Evan Broder
  • Date: 2009-03-08 00:46:17 UTC
  • mfrom: (1.1.6 upstream) (3.1.3 squeeze)
  • Revision ID: james.westby@ubuntu.com-20090308004617-csqyjpnkg7daq9c4
Tags: 7.7.90+20090107-1ubuntu1
* Merge from debian unstable, remaining changes (LP: #288000, #217792):
  * Bootstrapping done via binary package from Debian unstable. See log
      entry for 7.7.90+20060906-3ubuntu1 for details.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
/* -*-C-*-
2
2
 
 
3
$Id: comlin.h,v 1.13 2008/01/30 20:02:11 cph Exp $
 
4
 
3
5
Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
4
6
    1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
5
 
    2006, 2007 Massachusetts Institute of Technology
 
7
    2006, 2007, 2008 Massachusetts Institute of Technology
6
8
 
7
9
This file is part of MIT/GNU Scheme.
8
10
 
23
25
 
24
26
*/
25
27
 
26
 
/* $Id: comlin.h,v 1.11 2007/01/05 21:19:25 cph Exp $
27
 
 *
28
 
 * This file contains definitions for the scheme command parser.
29
 
 *
30
 
 */
 
28
/* The scheme command parser.  */
31
29
 
32
30
#ifndef COMLIN_H_INCLUDED
33
31
#define COMLIN_H_INCLUDED
34
32
 
35
 
#include "ansidecl.h"
36
 
 
37
33
#ifndef boolean
38
34
#  define boolean       int
39
35
#endif
63
59
{
64
60
  int           type_tag;
65
61
  string        keyword;
66
 
  long          *data;
 
62
  void          *data;
67
63
  string        format;
68
64
  boolean       *supplied_p;
69
65
};
70
66
 
71
 
#define KEYWORD(str, var, type, format, sup)                            \
72
 
{                                                                       \
73
 
  type,                                                                 \
74
 
  ((string) str),                                                       \
75
 
  ((long *) var),                                                       \
76
 
  format,                                                               \
77
 
  sup                                                                   \
78
 
}
 
67
#define KEYWORD(str, var, type, format, sup) { type, str, var, format, sup }
79
68
 
80
 
#define END_KEYWORD()   KEYWORD("", NULL, LAST_KYWRD, NULL, NULL)
 
69
#define END_KEYWORD() KEYWORD ("", 0, LAST_KYWRD, 0, 0)
81
70
 
82
71
/* Fake boolean and string formats */
83
72
 
84
 
#define BFRMT   ((string) NULL)
85
 
#define SFRMT   ((string) NULL)
 
73
#define BFRMT (0)
 
74
#define SFRMT (0)
86
75
 
87
76
/* Exports */
88
77
 
89
 
extern char *program_name;
 
78
extern char * program_name;
90
79
 
91
 
extern void EXFUN (parse_keywords,
92
 
                   (int, char **, struct keyword_struct *, boolean));
 
80
extern void parse_keywords (int, char **, struct keyword_struct *, boolean);
93
81
 
94
82
#endif /* COMLIN_H_INCLUDED */