source: git/Singular/blackbox.h @ c728c0

spielwiese
Last change on this file since c728c0 was c728c0, checked in by Hans Schoenemann <hannes@…>, 13 years ago
check for blackbox git-svn-id: file:///usr/local/Singular/svn/trunk@13836 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 2.2 KB
Line 
1#ifndef BLACKBOX_H
2#define BLACKBOX_H
3#include <omalloc.h>
4#include <kernel/structs.h>
5#include <kernel/febase.h>
6
7void removeBlackboxStuff(const int rt);
8
9struct blackbox_struct;
10
11typedef struct blackbox_struct blackbox;
12
13struct  blackbox_struct
14{
15  /// destroy the object: b points to blackbox_struct, d to data
16  void (*blackbox_destroy)(blackbox  *b, void *d);
17  /// convert the object to a string (which should be freed by omFree)
18  char *(*blackbox_String)(blackbox *b,void *d);
19  /// print the object: default: use string representation
20  void (*blackbox_Print)(blackbox *b,void *d);
21  /// construct the default object
22  void *(*blackbox_Init)(blackbox *b);
23  /// copy the object: b points to blackbox_struct, d to data
24  void *(*blackbox_Copy)(blackbox *b,void *d);
25  /// interpreter assign: l:=r
26  BOOLEAN (*blackbox_Assign)(leftv l, leftv r);
27  /// interpreter: unary operations op(r), r(), ...
28  BOOLEAN (*blackbox_Op1)(int op,leftv l, leftv r);
29  /// interpreter: binary operations: op(r1,r2), r1 op r2,...
30  BOOLEAN (*blackbox_Op2)(int op,leftv l, leftv r1,leftv r2);
31  /// interpreter: tertiary op: op(r1,r2,r3)
32  BOOLEAN (*blackbox_Op3)(int op,leftv l, leftv r1,leftv r2, leftv r3);
33  /// interpreter: operations with undefined number of operands
34  BOOLEAN (*blackbox_OpM)(int op,leftv l, leftv r);
35  /// check internal structure
36  BOOLEAN (*blackbox_Check)(blackbox *b,void *d);
37  /// additional type info
38  void *data;
39  /// addtinional gneral properties
40  char like_lists; // 1:blackbox is only a wrapper for lists
41} ;
42/// default procedure blackboxDefaultOp1, to be called as "default:" branch
43BOOLEAN blackboxDefaultOp1(int op,leftv l, leftv r);
44/// default procedure blackboxDefaultOp2, to be called as "default:" branch
45BOOLEAN blackboxDefaultOp2(int op,leftv l, leftv r1, leftv r2);
46
47/// return the structure to the type given by t
48blackbox* getBlackboxStuff(const int t);
49/// return the name to the type given by t (r/o)
50const char *    getBlackboxName(const int t);
51/// used by scanner: returns ROOTDECL for known types (and the type number in t)
52int blackboxIsCmd(const char *n, int & tok);
53/// define a new type
54int setBlackboxStuff(blackbox *bb,const char *name);
55
56/// list all defined type (for debugging)
57void printBlackboxTypes();
58
59#endif
Note: See TracBrowser for help on using the repository browser.