Parent Directory | Revision Log | 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); |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |