ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/microscheme/scheme.c
(Generate patch)

Comparing microscheme/scheme.c (file contents):
Revision 1.46 by root, Mon Nov 30 09:16:55 2015 UTC vs.
Revision 1.47 by root, Mon Nov 30 09:25:19 2015 UTC

… …
413{ 413{
414 return strvalue (p); 414 return strvalue (p);
415} 415}
416 416
417#if USE_PLIST 417#if USE_PLIST
418#error plists are broken because symbols are no longer pairs
418#define symprop(p) cdr(p) 419#define symprop(p) cdr(p)
419SCHEME_EXPORT int 420SCHEME_EXPORT int
420hasprop (pointer p) 421hasprop (pointer p)
421{ 422{
422 return typeflag (p) & T_SYMBOL; 423 return typeflag (p) & T_SYMBOL;

Diff Legend

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