subst 650 src/lread.c static Lisp_Object substitute_object_recurse (struct subst *, Lisp_Object); subst 4381 src/lread.c struct subst subst = { object, placeholder, completed, Qnil }; subst 4382 src/lread.c Lisp_Object check_object = substitute_object_recurse (&subst, object); subst 4392 src/lread.c substitute_object_recurse (struct subst *subst, Lisp_Object subtree) subst 4395 src/lread.c if (EQ (subst->placeholder, subtree)) subst 4396 src/lread.c return subst->object; subst 4406 src/lread.c if (!NILP (Fmemq (subtree, subst->seen))) subst 4413 src/lread.c if (EQ (subst->completed, Qt) subst 4414 src/lread.c || hash_lookup (XHASH_TABLE (subst->completed), subtree, NULL) >= 0) subst 4415 src/lread.c subst->seen = Fcons (subtree, subst->seen); subst 4443 src/lread.c substitute_object_recurse (subst, AREF (subtree, i))); subst 4448 src/lread.c XSETCAR (subtree, substitute_object_recurse (subst, XCAR (subtree))); subst 4449 src/lread.c XSETCDR (subtree, substitute_object_recurse (subst, XCDR (subtree))); subst 4459 src/lread.c substitute_in_interval, subst);