From f376b475d4a31dda735c34e7952e600dece11db1 Mon Sep 17 00:00:00 2001
From: Eshel Yaron <me@eshelyaron.com>
Date: Sat, 15 Oct 2022 09:25:54 +0300
Subject: [PATCH] ENHANCED: create Prolog flag sweep=true when running under
 sweep

---
 sweeprolog.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/sweeprolog.el b/sweeprolog.el
index bc23c25..2d023de 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -172,6 +172,8 @@ inserted to the input history in `sweeprolog-top-level-mode' buffers."
 
 (defcustom sweeprolog-init-args (list "-q"
                                       "--no-signals"
+                                      "-g"
+                                      "create_prolog_flag(sweep,true,[access(read_only),type(boolean)])"
                                       (expand-file-name
                                        "sweep.pl"
                                        (file-name-directory load-file-name)))
-- 
2.39.2