/[emacs]/emacs/src/abbrev.c
ViewVC logotype

Diff of /emacs/src/abbrev.c

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

revision 1.57 by lektu, Tue Feb 4 14:03:11 2003 UTC revision 1.58 by monnier, Thu Apr 17 21:44:50 2003 UTC
# Line 592  of the form (ABBREVNAME EXPANSION HOOK U Line 592  of the form (ABBREVNAME EXPANSION HOOK U
592      }      }
593    CHECK_VECTOR (table);    CHECK_VECTOR (table);
594    
595    for (; !NILP (definitions); definitions = Fcdr (definitions))    for (; CONSP (definitions); definitions = XCDR (definitions))
596      {      {
597        elt = Fcar (definitions);        elt = XCAR (definitions);
598        name  = Fcar (elt);       elt = Fcdr (elt);        name  = Fcar (elt);       elt = Fcdr (elt);
599        exp   = Fcar (elt);       elt = Fcdr (elt);        exp   = Fcar (elt);       elt = Fcdr (elt);
600        hook  = Fcar (elt);       elt = Fcdr (elt);        hook  = Fcar (elt);       elt = Fcdr (elt);

Legend:
Removed from v.1.57  
changed lines
  Added in v.1.58

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