archive/o/plot.h

   1
   2
   3 /************************************************************************
   4  *
   5  *  Code is modified from the code for Gnuplot by Zou Maorong
   6  */
   7 /*
   8  *  G N U P L O T  --  plot.h
   9  *  Copyright (C) 1986, 1987  Thomas Williams, Colin Kelley
  10  *  You may use this code as you wish if credit is given and this message
  11  *  is retained.
  12  */
  13 /****************************************************************************/
  14
  15
  16
  17 #define memcpy(d,s,l)    bcopy(s,d,l)
  18 #define top_of_stack     stack[s_p]
  19
  20
  21 typedef int              BOOLEAN;
  22 typedef int              (*FUNC_PTR)();
  23
  24
  25 #define is_jump(operator) ((operator) >=(int)JUMP && (operator) <(int)SF_START)
  26
  27 enum DATA_TYPES
  28 {
  29   INT, CMPLX, REAL, UNDEFINED
  30 };
  31
  32 struct cmplx
  33 {
  34   double real, imag;
  35 };
  36
  37 struct value
  38 {
  39   enum DATA_TYPES type;
  40   union
  41     {
  42       int int_val;
  43       struct cmplx cmplx_val;
  44     } v;
  45 };
  46
  47
  48 /****************************************************************************/
  49
  50
  51