allow the option to have priorities above 1200

2015-12-15 08:38:56 +00:00
parent c6f1c328f8
commit edb6189512
13 changed files with 37 additions and 37 deletions
--- a/BEAM/eam_am.c
+++ b/BEAM/eam_am.c
@@ -2512,7 +2512,7 @@ break_debug(contador);
 #endif

 #ifdef DEBUG
-			 Yap_plwrite ((Term) beam_X[1], NULL, 0, 1200);
+			 Yap_plwrite ((Term) beam_X[1], NULL, 0, GLOBAL_MaxPriority);
 #else
 			 extern int beam_write (void);
 			 beam_write();