This commit is contained in:
rsc 2006-04-14 00:15:16 +00:00
parent b6d98463b4
commit 90a99688be
4 changed files with 6 additions and 1243 deletions

View file

@ -1,4 +1,5 @@
#include <stdio.h>
#include <math.h>
#include <ctype.h>
#include <errno.h>
#include "pic.h"
@ -511,7 +512,7 @@ struct symtab*
copythru(char *s) /* collect the macro name or body for thru */
{
struct symtab *p;
char *q, *addnewline();
char *q;
p = lookup(s);
if (p != NULL) {

View file

@ -1,3 +1,4 @@
#include <math.h>
#include <stdio.h>
#include "pic.h"
#include "y.tab.h"
@ -11,7 +12,7 @@ linegen(int type)
static double prevh = HT5;
int i, j, some, head, ddtype, invis, chop;
double ddval, chop1, chop2, x0, y0, x1, y1;
double sin(), cos(), atan2(), theta;
double theta;
double defx, defy;
obj *p, *ppos;
static int xtab[] = { 1, 0, -1, 0 }; /* R=0, U=1, L=2, D=3 */

View file

@ -369,7 +369,7 @@ getfirst(int n, int t) /* find n-th occurrence of type t */
double
getblkvar(obj *p, char *s) /* find variable s2 in block p */
{
YYSTYPE y, getblk();
YYSTYPE y;
y = getblk(p, s);
return y.f;
@ -378,7 +378,7 @@ getblkvar(obj *p, char *s) /* find variable s2 in block p */
obj*
getblock(obj *p, char *s) /* find variable s in block p */
{
YYSTYPE y, getblk();
YYSTYPE y;
y = getblk(p, s);
return y.o;

File diff suppressed because it is too large Load diff