Changeset 72a01e in git for Singular/subexpr.h

Timestamp:

Apr 23, 2014, 12:19:21 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

bb506bf3a0a0ac42333f7f5150453aa276562b39

Parents:

4676d5eca0f4ac138d3c85099b1c244a3d695016

Message:

removed unused febase.h, moved parts to ipshell.h/subexpr.h/structs.h

File:

• Singular/subexpr.h (modified) (1 diff)

Singular/subexpr.h

@@ -12 +12 @@
 #include <polys/monomials/ring.h>
 
-#include <Singular/febase.h>
-//#include <kernel/structs.h>
+//#include <Singular/ipid.h>
 
 #include <Singular/grammar.h>
 #include <Singular/tok.h>
 #include <Singular/attrib.h>
+
+typedef enum { LANG_NONE, LANG_TOP, LANG_SINGULAR, LANG_C, LANG_MAX} language_defs;
+class proc_singular
+{
+public:
+  long   proc_start;       // position where proc is starting
+  long   def_end;          // position where proc header is ending
+  long   help_start;       // position where help is starting
+  long   help_end;         // position where help is starting
+  long   body_start;       // position where proc-body is starting
+  long   body_end;         // position where proc-body is ending
+  long   example_start;    // position where example is starting
+  long   proc_end;         // position where proc is ending
+  int    proc_lineno;
+  int    body_lineno;
+  int    example_lineno;
+  char   *body;
+  long help_chksum;
+};
+struct proc_object
+{
+//public:
+  BOOLEAN (*function)(leftv res, leftv v);
+};
+
+union uprocinfodata
+{
+public:
+  proc_singular  s;        // data of Singular-procedure
+  struct proc_object    o; // pointer to binary-function
+};
+typedef union uprocinfodata procinfodata;
+
+class procinfo
+{
+public:
+  char          *libname;
+  char          *procname;
+  package       pack;
+  language_defs language;
+  short         ref;
+  char          is_static;        // if set, proc not accessible for user
+  char          trace_flag;
+  procinfodata  data;
+};
+
+typedef procinfo *         procinfov;
 
 struct _ssubexpr