/[guile]/guile/guile-core/libguile/eval.c
ViewVC logotype

Diff of /guile/guile-core/libguile/eval.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.315 by dirk, Wed Jun 4 05:28:34 2003 UTC revision 1.316 by dirk, Wed Jun 4 23:22:54 2003 UTC
# Line 2448  dispatch: Line 2448  dispatch:
2448        /* new syntactic forms go here. */        /* new syntactic forms go here. */
2449      case SCM_BIT7 (SCM_MAKISYM (0)):      case SCM_BIT7 (SCM_MAKISYM (0)):
2450        proc = SCM_CAR (x);        proc = SCM_CAR (x);
2451          if (!SCM_IFLAGP (proc))
2452            goto evapply;
2453    
2454        switch (SCM_ISYMNUM (proc))        switch (SCM_ISYMNUM (proc))
2455          {          {
2456    

Legend:
Removed from v.1.315  
changed lines
  Added in v.1.316

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26