source: git/Singular/tok.h @ 5c2863

spielwiese
Last change on this file since 5c2863 was 5c2863, checked in by Hans Schönemann <hannes@…>, 25 years ago
*hannes: modification for spectrum: semicsqh -> semic git-svn-id: file:///usr/local/Singular/svn/trunk@3454 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 4.5 KB
Line 
1#ifndef TOK_H
2#define TOK_H
3/****************************************
4*  Computer Algebra System SINGULAR     *
5****************************************/
6/*
7* ABSTRACT: tokens, types for interpreter; general macros
8*/
9/* $Id: tok.h,v 1.27 1999-08-16 15:43:57 Singular Exp $ */
10
11#ifndef MYYSTYPE
12#include "structs.h"
13#endif
14#ifndef UMINUS
15#include "grammar.h"
16#endif
17
18extern int      yylineno;
19extern char     my_yylinebuf[80];
20
21#if defined(__cplusplus)
22extern int  yyparse(void);
23#endif
24
25#define loop for(;;)
26
27#ifndef ABS
28#define ABS(x) ((x)<0?(-(x)):(x))
29#endif
30
31#if defined(__cplusplus)
32inline int max(const int a, const int b)  { return (a>b) ? a : b; }
33inline int min(const int a, const int b)  { return (a<b) ? a : b; }
34#else
35#define max(A,B) ((A) > (B) ? (A) : (B))
36#define min(A,B) ((A) < (B) ? (A) : (B))
37#endif
38
39#define COMMAND           UMINUS+2 /* in tok.h */
40#define ANY_TYPE          UMINUS+3
41#define IDHDL             UMINUS+4
42#define NSHDL             UMINUS+5
43
44enum {
45  ALIAS_CMD     = UMINUS + 15,
46  ATTRIB_CMD,
47  BAREISS_CMD,
48  CHARACTERISTIC_CMD,
49  CHARSTR_CMD,
50  CHAR_SERIES_CMD,
51  CLOSE_CMD,
52  COLS_CMD,
53  CONTENT_CMD,
54  COUNT_CMD,
55  DBPRINT_CMD,
56  DEF_CMD,
57  DEFINED_CMD,
58  DELETE_CMD,
59  DET_CMD,
60  DUMP_CMD,
61  END_GRAMMAR,
62  ERROR_CMD,
63  EXTGCD_CMD,
64  FAC_CMD,
65  FIND_CMD,
66  FACSTD_CMD,
67  FGLM_CMD,
68  FINDUNI_CMD,
69  GCD_CMD,
70  GETDUMP_CMD,
71  HIGHCORNER_CMD,
72  INSERT_CMD,
73  INT_CMD,
74  INTVEC_CMD,
75  IS_RINGVAR,
76  KILLATTR_CMD,
77  LAGSOLVE_CMD,
78  LINK_CMD,
79  LIST_CMD,
80  LOAD_CMD,
81  LRES_CMD,
82  MEMORY_CMD,
83  MONITOR_CMD,
84  MPRES_CMD,
85  MSTD_CMD,
86  NAMEOF_CMD,
87  NAMES_CMD,
88  NPARS_CMD,
89  NVARS_CMD,
90  OPEN_CMD,
91  OPTION_CMD,
92  ORDSTR_CMD,
93  PACKAGE_CMD,
94  PARSTR_CMD,
95  POINTER_CMD,
96  PRIME_CMD,
97  PRINT_CMD,
98  PRUNE_CMD,
99  QRING_CMD,
100  RANDOM_CMD,
101  READ_CMD,
102  RESERVEDNAME_CMD,
103  RESULTANT_CMD,
104  ROWS_CMD,
105#ifdef HAVE_SPECTRUM
106  SPECTRUM_CMD,
107  SEMIC_CMD,
108#endif
109  SQR_FREE_DEC_CMD,
110  STATUS_CMD,
111  STRING_CMD,
112  SYSTEM_CMD,
113  TEST_CMD,
114  TRANSPOSE_CMD,
115  TRACE_CMD,
116  TYPEOF_CMD,
117  UNLOAD_CMD,
118  URSOLVE_CMD,
119  VANDER_CMD,
120  VARSTR_CMD,
121  WRITE_CMD,
122  /* start system var section: VECHO */
123  VECHO,
124  VPAGELENGTH,
125  VCOLMAX,
126  VTIMER,
127  VRTIMER,
128  TRACE,
129  VOICE,
130  VSHORTOUT,
131  VPRINTLEVEL,
132  /* end system var section: VPRINTLEVEL */
133
134  MAX_TOK /* must be the last, biggest token number */
135};
136
137#define NONE END_RING
138#define UNKNOWN 0
139
140/*
141**  Set operations (small sets only)
142*/
143
144#define Sy_bit(x)     (1<<(x))
145#define Sy_inset(x,s) ((Sy_bit(x)&(s))?TRUE:FALSE)
146#define BTEST1(a)     Sy_inset((a), test)
147#define BVERBOSE(a)   Sy_inset((a), verbose)
148
149/*
150** defines for BITSETs
151*/
152
153#define V_SHOW_MEM  2
154#define V_YACC      3
155#define V_REDEFINE  4
156#define V_READING   5
157#define V_LOAD_LIB  6
158#define V_DEBUG_LIB 7
159#define V_LOAD_PROC 8
160#define V_DEF_RES   9
161#define V_DEBUG_MEM 10
162#define V_SHOW_USE  11
163#define V_IMAP      12
164#define V_PROMPT    13
165#define V_NSB       14
166
167#define TEST_VERB_NSB              BVERBOSE(V_NSB)
168
169#define OPT_PROT           0
170#define OPT_REDSB          1
171#define OPT_NOT_SUGAR      3
172#define OPT_INTERRUPT      4
173#define OPT_SUGARCRIT      5
174#define OPT_DEBUG          6
175#define OPT_CANCELUNIT     7
176#define OPT_MOREPAIRS      8
177#define OPT_RETURN_SB      9
178#define OPT_FASTHC        10
179#define OPT_KEEPVARS      21
180#define OPT_STAIRCASEBOUND 22
181#define OPT_MULTBOUND     23
182#define OPT_DEGBOUND      24
183#define OPT_REDTAIL       25
184#define OPT_INTSTRATEGY   26
185#define OPT_MINRES        28
186#define OPT_SB_1          29
187#define OPT_NOTREGULARITY 30
188#define OPT_WEIGHTM       31
189
190#define TEST_OPT_PROT              BTEST1(OPT_PROT)
191#define TEST_OPT_REDSB             BTEST1(OPT_REDSB)
192#define TEST_OPT_NOT_SUGAR         BTEST1(OPT_NOT_SUGAR)
193#define TEST_OPT_SUGARCRIT         BTEST1(OPT_SUGARCRIT)
194#define TEST_OPT_DEBUG             BTEST1(OPT_DEBUG)
195#define TEST_OPT_MOREPAIRS         BTEST1(OPT_MOREPAIRS)
196#define TEST_OPT_FASTHC            BTEST1(OPT_FASTHC)
197#define TEST_OPT_INTSTRATEGY       BTEST1(OPT_INTSTRATEGY)
198#define TEST_OPT_CANCELUNIT        BTEST1(OPT_CANCELUNIT)
199#define TEST_OPT_RETURN_SB         BTEST1(OPT_RETURN_SB)
200#define TEST_OPT_KEEPVARS          BTEST1(OPT_KEEPVARS)
201#define TEST_OPT_DEGBOUND          BTEST1(OPT_DEGBOUND)
202#define TEST_OPT_MULTBOUND         BTEST1(OPT_MULTBOUND)
203#define TEST_OPT_STAIRCASEBOUND    BTEST1(OPT_STAIRCASEBOUND)
204#define TEST_OPT_REDTAIL           BTEST1(OPT_REDTAIL)
205#define TEST_OPT_MINRES            BTEST1(OPT_MINRES)
206#define TEST_OPT_SB_1              BTEST1(OPT_SB_1)
207#define TEST_OPT_NOTREGULARITY     BTEST1(OPT_NOTREGULARITY)
208#define TEST_OPT_WEIGHTM           BTEST1(OPT_WEIGHTM)
209
210#endif
Note: See TracBrowser for help on using the repository browser.