ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/Development/ray/src/common/calexpr.c
(Generate patch)

Comparing ray/src/common/calexpr.c (file contents):
Revision 2.1 by greg, Tue Nov 12 16:55:21 1991 UTC vs.
Revision 2.3 by greg, Thu May 7 22:30:41 1992 UTC

# Line 32 | Line 32 | static char SCCSid[] = "$SunId$ LBL";
32  
33   #define  isdecimal(c)   (isdigit(c) || (c) == '.')
34  
35 < extern double  atof(), pow();
35 > #ifndef atof
36 > extern double  atof();
37 > #endif
38 > extern double  pow();
39   extern char  *fgets(), *savestr();
40   extern char  *emalloc(), *ecalloc();
41   extern EPNODE  *curfunc;
# Line 750 | Line 753 | register EPNODE  *ep;
753  
754      if (ep->type != VAR)
755          return(0);
756 <    dp = ep->v.ln->def;
757 <    if (dp != NULL && dp->type != ':')
758 <        return(0);
759 <    if ((dp == NULL || dp->v.kid->type != FUNC)
760 <            && ((lp = liblookup(ep->v.ln->name)) == NULL
758 <                    || lp->atyp != ':'))
759 <        return(0);
760 <    return(1);
756 >    if ((dp = ep->v.ln->def) != NULL && dp->v.kid->type == FUNC)
757 >        return(dp->type == ':');
758 >    if ((lp = liblookup(ep->v.ln->name)) != NULL)
759 >        return(lp->atyp == ':');
760 >    return(0);
761   }
762   #endif
763   #endif

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)