diff --git a/bin/ikarus b/bin/ikarus index cc15fef..9e0b02c 100755 Binary files a/bin/ikarus and b/bin/ikarus differ diff --git a/bin/ikarus-symbol-table.c b/bin/ikarus-symbol-table.c index 0163ec9..acdf73f 100644 --- a/bin/ikarus-symbol-table.c +++ b/bin/ikarus-symbol-table.c @@ -47,7 +47,7 @@ static ikp ik_make_symbol(ikp str, ikpcb* pcb){ ikp sym = ik_alloc(pcb, symbol_size) + symbol_tag; ref(sym, off_symbol_string) = str; ref(sym, off_symbol_ustring) = false_object; - ref(sym, off_symbol_value) = str; //unbound_object; + ref(sym, off_symbol_value) = unbound_object; ref(sym, off_symbol_plist) = null_object; ref(sym, off_symbol_system_value) = str; ref(sym, off_symbol_system_plist) = null_object;