ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/common/calcomp.h
(Generate patch)

Comparing ray/src/common/calcomp.h (file contents):
Revision 2.10 by schorsch, Sat Jun 7 12:50:20 2003 UTC vs.
Revision 2.24 by greg, Tue Sep 26 18:33:14 2023 UTC

# Line 4 | Line 4
4   */
5   #ifndef _RAD_CALCOMP_H_
6   #define _RAD_CALCOMP_H_
7 +
8 + #include <stdio.h>
9 +
10   #ifdef __cplusplus
11   extern "C" {
12   #endif
13  
11
12 #include "copyright.h"
13
14 #include <stdio.h>
15
14   #define  VAR            1
15   #define  NUM            2
16   #define  UMINUS         3
17   #define  CHAN           4
18   #define  FUNC           5
19   #define  ARG            6
20 < #define  TICK           7
20 > #define  CLKT           7
21   #define  SYM            8
22                                  /* also: '+', '-', '*', '/', '^', '=', ':' */
23  
# Line 27 | Line 25 | typedef struct {
25      char  *fname;               /* function name */
26      short  nargs;               /* # of required arguments */
27      short  atyp;                /* assignment type (':' or '=') */
28 <    double  (*f)();             /* pointer to function */
28 >    double  (*f)(char *);       /* pointer to function */
29   }  LIBR;                /* a library function */
30  
31   typedef struct epnode {
34    int  type;                  /* node type */
35    struct epnode  *sibling;    /* next child this level */
32      union {
33          struct epnode  *kid;    /* first child */
34          double  num;            /* number */
# Line 47 | Line 43 | typedef struct epnode {
43              struct vardef  *next;       /* next in hash list */
44          }  *ln;                 /* link */
45      } v;                /* value */
46 +    struct epnode  *sibling;    /* next child this level */
47 +    int  type;                  /* node type */
48   }  EPNODE;      /* an expression node */
49  
50   typedef struct vardef  VARDEF;  /* a variable definition */
51  
52 < #define  MAXWORD        127             /* maximum word/id length */
52 > #define  RMAXWORD       127             /* maximum word/id length */
53   #define  CNTXMARK       '`'             /* context mark */
54  
55   #define  isid(c)        (isalnum(c) || (c) == '_' || \
# Line 59 | Line 57 | typedef struct vardef  VARDEF; /* a variable definitio
57  
58   #define  evalue(ep)     (*eoper[(ep)->type])(ep)
59  
60 + #define  dfn_name(ep)   ((ep)->v.kid->type == SYM ? \
61 +                        (ep)->v.kid->v.name : \
62 +                        (ep)->v.kid->v.kid->v.name)
63 +
64                                          /* flags to set in esupport */
65   #define  E_VARIABLE     001
66   #define  E_FUNCTION     002
# Line 67 | Line 69 | typedef struct vardef  VARDEF; /* a variable definitio
69   #define  E_RCONST       020
70   #define  E_REDEFW       040
71  
72 < extern double  (*eoper[])();
72 > extern double  (*eoper[])(EPNODE *);
73   extern unsigned long  eclock;
74   extern unsigned int  esupport;
75   extern EPNODE   *curfunc;
76   extern int  nextc;
77 <
77 > extern int  eofc;
78 >                                        /* defined in biggerlib.c */
79 > extern void biggerlib(void);
80                                          /* defined in caldefn.c */
81   extern void     fcompile(char *fname);
82   extern void     scompile(char *str, char *fname, int ln);
83   extern double   varvalue(char *vname);
84   extern double   evariable(EPNODE *ep);
85 < extern void     varset(char *fname, int assign, double val);
85 > extern void     varset(char *vname, int assign, double val);
86   extern void     dclear(char *name);
87   extern void     dremove(char *name);
88   extern int      vardefined(char *name);
89 < extern char     *setcontext(char *ctx);
89 > extern char     *calcontext(char *ctx);
90   extern char     *pushcontext(char *ctx);
91   extern char     *popcontext(void);
92   extern char     *qualname(char *nam, int lvl);
# Line 98 | Line 102 | extern EPNODE  *dnext(void);
102   extern EPNODE   *dpop(char *name);
103   extern void     dpush(char *nm, EPNODE *ep);
104   extern void     addchan(EPNODE *sp);
105 < extern void     getstatement();
106 < extern EPNODE   *getdefn();
107 < extern EPNODE   *getchan();
105 > extern void     getstatement(void);
106 > extern EPNODE   *getdefn(void);
107 > extern EPNODE   *getchan(void);
108                                          /* defined in calexpr.c */
109   extern EPNODE   *eparse(char *expr);
110   extern double   eval(char *expr);
# Line 129 | Line 133 | extern int     isconstfun(EPNODE *ep);
133                                          /* defined in calfunc.c */
134   extern int      fundefined(char *fname);
135   extern double   funvalue(char *fname, int n, double *a);
136 < extern void     funset(char *fname, int nargs, int assign, double (*fptr)());
136 > extern void     funset(char *fname, int nargs, int assign,
137 >                                double (*fptr)(char *));
138   extern int      nargum(void);
139   extern double   argument(int n);
140   extern VARDEF   *argf(int n);
# Line 140 | Line 145 | extern void    libupdate(char *fn);
145                                          /* defined in calprnt.c */
146   extern void     eprint(EPNODE *ep, FILE *fp);
147   extern void     dprint(char *name, FILE *fp);
143                                        /* defined in savestr.c */
144 extern char     *savestr(char *str);
145 extern void     freestr(char *s);
146 extern int      shash(char *s);
147                                        /* defined in ealloc.c */
148 extern char     *emalloc(unsigned int n);
149 extern char     *ecalloc(unsigned int ne, unsigned int es);
150 extern char     *erealloc(char *cp, unsigned int n);
151 extern void     efree(char *cp);
152                                        /* miscellaneous */
153 extern void     eputs(char *s);
154 extern void     wputs(char *s);
155 extern void     quit(int code);
148                                          /* defined by client */
149   extern double   chanvalue(int n);
158
150  
151   #ifdef __cplusplus
152   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines