diff options
Diffstat (limited to 'src/data.c')
-rw-r--r-- | src/data.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/data.c b/src/data.c index bdbead64df0..d9c905a6b0e 100644 --- a/src/data.c +++ b/src/data.c @@ -1215,9 +1215,9 @@ Lisp_Object indirect_function (object) register Lisp_Object object; { - Lisp_Object tortise, hare; + Lisp_Object tortoise, hare; - hare = tortise = object; + hare = tortoise = object; for (;;) { @@ -1228,9 +1228,9 @@ indirect_function (object) break; hare = XSYMBOL (hare)->function; - tortise = XSYMBOL (tortise)->function; + tortoise = XSYMBOL (tortoise)->function; - if (EQ (hare, tortise)) + if (EQ (hare, tortoise)) Fsignal (Qcyclic_function_indirection, Fcons (object, Qnil)); } |