-L swi compatibility had broken standard -L usage in YAP :(wq

2008-08-29 05:19:36 +01:00 · 2008-08-29 05:19:36 +01:00 · 04c944972b
commit 04c944972b
parent 05f93cd4e6
1 changed files with 1 additions and 1 deletions
--- a/console/yap.c
+++ b/console/yap.c
@ -514,7 +514,7 @@ parse_yap_arguments(int argc, char *argv[], YAP_init_args *iap)
 	    break;
 #endif
 	  case 'L':
-	    if (p[0])
+	    if (p[1])
 	      goto stack_mode;
 	    iap->QuietMode = TRUE;
 	    iap->HaltAfterConsult = TRUE;