1 files changed, 1 insertions, 2 deletions
diff --git a/parser.y b/parser.y
index d29944e1..4318e660 100644
--- a/parser.y
+++ b/parser.y
@@ -1628,8 +1628,7 @@ static val rlviable(val form)
 val rlset(val form, val info)
 {
   if (rlviable(form)) {
-    val cell = gethash_c(lit("rlcp"), form_to_ln_hash, form, nulloc);
-    loc place = cdr_l(cell);
+    loc place = gethash_l(lit("rlcp"), form_to_ln_hash, form, nulloc);
     if (nilp(deref(place)))
       set(place, info);
   }