getenv now returns #f for unset environment variables.

This commit is contained in:
Abdulaziz Ghuloum
2008-12-05 02:19:26 -05:00
parent 73f045a6c3
commit b037b1b671
3 changed files with 10 additions and 12 deletions
+1 -6
View File
@@ -908,12 +908,7 @@ ikrt_getenv(ikptr bv, ikpcb* pcb){
return s;
}
else {
/* empty bv */
ikptr s = ik_safe_alloc(pcb, align(disp_bytevector_data+1))
+ bytevector_tag;
ref(s, -bytevector_tag) = fix(0);
ref(s, off_bytevector_data) = 0;
return s;
return false_object;
}
}