Typfixes

Change-Id: I29c337444e3379cdc58a014ca2e6d541ee7502b8
diff --git a/std/shells/magier/parsing.c b/std/shells/magier/parsing.c
index 37eaebd..074aaa2 100644
--- a/std/shells/magier/parsing.c
+++ b/std/shells/magier/parsing.c
@@ -296,10 +296,13 @@
 
   if ((mode==MODE_LSA||mode==MODE_LSB))
   {
-    string *vrooms;
     object vcompiler =
       find_object(implode(patharray[0..<2],"/")+"/virtual_compiler");
-    if (vcompiler && pointerp(vrooms=(mixed *)vcompiler->QueryObjects()))
+
+    object *vrooms = ({});
+    if (vcompiler)
+      vrooms = vcompiler->QueryObjects();
+    
     map(vrooms,#'_vc_map,&data);
   }
   mixed *files=({});