ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/meta/misc.c
(Generate patch)

Comparing ray/src/meta/misc.c (file contents):
Revision 1.1 by greg, Sat Feb 22 02:07:26 2003 UTC vs.
Revision 1.4 by schorsch, Sat Nov 15 02:13:37 2003 UTC

# Line 6 | Line 6 | static const char      RCSid[] = "$Id$";
6   */
7  
8  
9 + #include  "rtio.h"
10   #include  "meta.h"
11  
12  
12 –
13   char  coms[] = COML;
14  
15   char  errmsg[128];
16  
17  
18  
19 – error(errtype, emsg)            /* report error */
20 –
21 – int  errtype;
22 – char  *emsg;
23 –
24 – {
25 –
26 – switch (errtype)  {
27 –
28 –    case WARNING:
29 –       wputs(progname);
30 –       wputs(": warning - ");
31 –       wputs(emsg);
32 –       wputs("\n");
33 –       break;
34 –
35 –    case USER:
36 –       eputs(progname);
37 –       eputs(": fatal - ");
38 –       eputs(emsg);
39 –       eputs("\n");
40 –       exit(1);
41 –       break;
42 –
43 –    case SYSTEM:
44 –       eputs(progname);
45 –       eputs(": system - ");
46 –       eputs(emsg);
47 –       eputs("\n");
48 –       exit(1);
49 –       break;
50 –    }
51 –
52 – }
53 –
54 –
55 –
56 –
19   int
20 < comndx(c)               /* return index for command */
20 > comndx(         /* return index for command */
21 >        register int  c
22 > )
23  
60 – register int  c;
61 –
24   {
25   register char  *cp;
26  
# Line 78 | Line 40 | register int  c;
40  
41  
42   PRIMITIVE  *
43 < pop(pl)                 /* pop top off plist */
43 > pop(                    /* pop top off plist */
44 >        register PLIST  *pl
45 > )
46  
83 – register PLIST  *pl;
84 –
47   {
48   register PRIMITIVE  *p;
49  
# Line 96 | Line 58 | register PLIST  *pl;
58  
59  
60  
61 + void
62 + push(           /* push primitive onto plist */
63 +        register PRIMITIVE  *p,
64 +        register PLIST  *pl
65 + )
66  
100 – push(p, pl)             /* push primitive onto plist */
101 –
102 – register PRIMITIVE  *p;
103 – register PLIST  *pl;
104 –
67   {
68  
69   if ((p->pnext = pl->ptop) == NULL)
# Line 112 | Line 74 | register PLIST  *pl;
74  
75  
76  
77 <
78 < add(p, pl)              /* add primitive to plist */
79 <
80 < register PRIMITIVE  *p;
81 < register PLIST  *pl;
120 <
77 > void
78 > add(            /* add primitive to plist */
79 >        register PRIMITIVE  *p,
80 >        register PLIST  *pl
81 > )
82   {
83  
84   if (pl->ptop == NULL)
# Line 131 | Line 92 | register PLIST  *pl;
92  
93  
94  
95 + void
96 + append(         /* append pl1 to the end of pl2 */
97 +        register PLIST  *pl1,
98 +        register PLIST  *pl2
99 + )
100  
135 – append(pl1, pl2)                /* append pl1 to the end of pl2 */
136 –
137 – register PLIST  *pl1, *pl2;
138 –
101   {
102  
103      if (pl1->ptop != NULL) {
# Line 150 | Line 112 | register PLIST  *pl1, *pl2;
112  
113  
114  
115 + void
116 + fargs(          /* free any arguments p has */
117 + register PRIMITIVE  *p
118 + )
119  
154 – fargs(p)                /* free any arguments p has */
155 –
156 – register PRIMITIVE  *p;
157 –
120   {
121  
122   if (p->args != NULL) {
# Line 167 | Line 129 | register PRIMITIVE  *p;
129  
130  
131   char *
132 < nextscan(start, format, result)         /* scan and advance through string */
132 > nextscan(               /* scan and advance through string */
133 >        register char  *start,
134 >        char  *format,
135 >        char  *result
136 > )
137  
172 – register char  *start;
173 – char  *format;
174 – char  *result;
175 –
138   {
139  
140      if (start == NULL) return(NULL);
# Line 187 | Line 149 | char  *result;
149   }
150  
151  
152 <
153 < mcopy(p1, p2, n)        /* copy p2 into p1 size n */
154 <
155 < register char  *p1, *p2;
156 < register int  n;
152 > void
153 > mcopy(  /* copy p2 into p1 size n */
154 > register char  *p1,
155 > register char  *p2,
156 > register int  n
157 > )
158  
159   {
160  

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines