summaryrefslogtreecommitdiff
path: root/src/data.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1993-06-09 11:59:12 +0000
committerJim Blandy <jimb@redhat.com>1993-06-09 11:59:12 +0000
commiteb8c3be94e12644f506b8857e49ffef88046bb0b (patch)
tree505c4ea5ae59214e4d6e749047d160c98191c9d2 /src/data.c
parent16a4a21d0117ef5ed346f340f244fe199d3c8a26 (diff)
downloademacs-eb8c3be94e12644f506b8857e49ffef88046bb0b.tar.gz
Apply typo patches from Paul Eggert.
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c8
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));
}