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");