[Ecls-list] inexistant packages

[Alexander Gavrilov]

> On Mon, Aug 30, 2010 at 10:04 AM, Juan Jose Garcia-Ripoll <
> Ok, that should be fixed now. We just have to make sure that no other errors
> went unnoticed due to the one we have just fixed.

This fixes the fix. Otherwise even swank cannot be loaded from fasl...

--------------------------------- src/c/read.d ---------------------------------
index c07f725..93fb398 100644
@@ -2537,7 +2537,8 @@ read_VV(cl_object block, void (*entry_point)(cl_object))
 				2, CAR(x), block->cblock.name);
 			}
 		} end_loop_for_on(x);
-                /* old_eptbc = cl_core.packages_to_be_created; */
+		if (old_eptbc != OBJNULL)
+			old_eptbc = cl_core.packages_to_be_created;
 		if (VVtemp) {
 			block->cblock.temp_data = NULL;
 			block->cblock.temp_data_size = 0;

Alexander