fix scripts

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@348 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2002-02-06 17:35:26 +00:00
parent 293fdf9061
commit 6b29480d4a
4 changed files with 12 additions and 9 deletions
--- a/console/yap.c
+++ b/console/yap.c
@@ -211,7 +211,7 @@ parse_yap_arguments(int argc, char *argv[], yap_init_args *init_args)
  char *p;
  int BootMode = YAP_BOOT_FROM_SAVED_CODE;
  int *ssize;
-
+  
  while (--argc > 0)
    {
      p = *++argv;
@@ -348,6 +348,7 @@ parse_yap_arguments(int argc, char *argv[], yap_init_args *init_args)
 	      argc = 1;
 	    }
 	    init_args->YapPrologBootFile = *argv;
+	    argv++;
 	    init_args->HaltAfterConsult = TRUE;
 	    break;
 	  case 'l':