anaconda, no goal expansion within call

C/yap-args.c

@@ -319,6 +319,7 @@ static const char *find_directory(YAP_init_args *iap, const char *paths[],
   }
   int i = 0;
   while ((inp = paths[i++]) != NULL) {
+    printf("%s\n", inp);
     out[0] = '\0';
     char *o = location(iap, inp, out), *no;
     if (o && o[0] && Yap_isDirectory(o)) {
@@ -329,11 +330,14 @@ static const char *find_directory(YAP_init_args *iap, const char *paths[],
         int j = 0;
         while ((p = names[j++])) {
           char *io = o + s;
+          printf("-> %s\n", o);
           if ((no = location(iap, p, io)) && io[0] != '\0' && Yap_Exists(o))
             return pop_output_text_stack(lvl, realpath(o, full));
         }
-      } else
+      } else {
+        printf("-> %s\n", o);
         return pop_output_text_stack(lvl, o);
+      }
     }
   }
   pop_text_stack(lvl);