From 7e598987781d010bf723fca55c1e667d72b8f6e7 Mon Sep 17 00:00:00 2001
From: JeffBezanson <jeff.bezanson@gmail.com>
Date: Sun, 31 May 2009 22:27:37 +0000
Subject: [PATCH] updating doc

---
 femtolisp/cvalues.c | 2 +-
 femtolisp/flisp.c   | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/femtolisp/cvalues.c b/femtolisp/cvalues.c
index 5e67c8a..f6ca2e5 100644
--- a/femtolisp/cvalues.c
+++ b/femtolisp/cvalues.c
@@ -630,7 +630,7 @@ value_t cvalue_typeof(value_t *args, u_int32_t nargs)
 {
     argcount("typeof", nargs, 1);
     switch(tag(args[0])) {
-    case TAG_CONS: return conssym;
+    case TAG_CONS: return pairsym;
     case TAG_NUM1:
     case TAG_NUM:  return fixnumsym;
     case TAG_SYM:  return symbolsym;
diff --git a/femtolisp/flisp.c b/femtolisp/flisp.c
index c6395dc..254ae8d 100644
--- a/femtolisp/flisp.c
+++ b/femtolisp/flisp.c
@@ -98,7 +98,7 @@ value_t NIL, FL_T, FL_F, LAMBDA, QUOTE, IF, TRYCATCH;
 value_t BACKQUOTE, COMMA, COMMAAT, COMMADOT, FUNCTION;
 value_t IOError, ParseError, TypeError, ArgError, UnboundError, MemoryError;
 value_t DivideError, BoundsError, Error, KeyError, EnumerationError;
-value_t conssym, symbolsym, fixnumsym, vectorsym, builtinsym, vu8sym;
+value_t pairsym, symbolsym, fixnumsym, vectorsym, builtinsym, vu8sym;
 value_t definesym, defmacrosym, forsym, labelsym, printprettysym, setqsym;
 value_t printwidthsym, printreadablysym;
 value_t tsym, Tsym, fsym, Fsym, booleansym, nullsym, evalsym;
@@ -1541,7 +1541,7 @@ static void lisp_init(void)
     DivideError = symbol("divide-error");
     EnumerationError = symbol("enumeration-error");
     Error = symbol("error");
-    conssym = symbol("cons");
+    pairsym = symbol("pair");
     symbolsym = symbol("symbol");
     fixnumsym = symbol("fixnum");
     vectorsym = symbol("vector");