subst 776 src/lread.c static Lisp_Object substitute_object_recurse (struct subst *, Lisp_Object); subst 4630 src/lread.c struct subst subst = { object, placeholder, completed, Qnil }; subst 4631 src/lread.c Lisp_Object check_object = substitute_object_recurse (&subst, object); subst 4641 src/lread.c substitute_object_recurse (struct subst *subst, Lisp_Object subtree) subst 4644 src/lread.c if (EQ (subst->placeholder, subtree)) subst 4645 src/lread.c return subst->object; subst 4655 src/lread.c if (!NILP (Fmemq (subtree, subst->seen))) subst 4662 src/lread.c if (EQ (subst->completed, Qt) subst 4663 src/lread.c || hash_lookup (XHASH_TABLE (subst->completed), subtree, NULL) >= 0) subst 4664 src/lread.c subst->seen = Fcons (subtree, subst->seen); subst 4692 src/lread.c substitute_object_recurse (subst, AREF (subtree, i))); subst 4697 src/lread.c XSETCAR (subtree, substitute_object_recurse (subst, XCAR (subtree))); subst 4698 src/lread.c XSETCDR (subtree, substitute_object_recurse (subst, XCDR (subtree))); subst 4708 src/lread.c substitute_in_interval, subst);