Typfixes

Change-Id: I29c337444e3379cdc58a014ca2e6d541ee7502b8
diff --git a/std/lightsource.c b/std/lightsource.c
index 6975578..d2ff3aa 100644
--- a/std/lightsource.c
+++ b/std/lightsource.c
@@ -285,15 +285,15 @@
 
 static string _query_lightdesc()
 {
-  string *tmp;
-  int n,i;
+  string|string* l_desc = Query(P_LIGHTDESC);
+  if (!pointerp(l_desc))
+    return (string)l_desc;
   
-  tmp=Query(P_LIGHTDESC);
-  if (!pointerp(tmp)) return (string)tmp;
-  n=sizeof(tmp);
-  i=n*_query_fuel()/max_fuel;
-  if (i>=n) i=n-1;
-  return tmp[i];
+  int n = sizeof(l_desc);
+  int i = n * _query_fuel() / max_fuel;
+  if (i>=n)
+    i = n-1;
+  return l_desc[i];
 }
 
 static int _query_light()
diff --git a/std/room/exits.c b/std/room/exits.c
index 27f59d7..d0ead0b 100644
--- a/std/room/exits.c
+++ b/std/room/exits.c
@@ -208,7 +208,8 @@
 
 varargs string GetExits( object viewer ) 
 {
-    string *indices, *hidden;
+    string *indices;
+    int|string* hidden;
     string exits;
 
     if ( QueryProp(P_DOOR_INFOS) )
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=({});