From f514554aee1d7f0c07c24564c18a54a85174ce3f Mon Sep 17 00:00:00 2001
From: Timothy Sample <samplet@ngyro.com>
Date: Thu, 22 Dec 2022 13:35:50 -0600
Subject: [PATCH] xxx! Ignore signal stuff on Mes.

XXX: This is for Mes.  It might be possible to move forward with
broken signal semantics.  We need to test to see if it is worth it
to fix this.

* gash/built-ins/trap.scm (main) [mes]: Do not call 'sigaction'.
* gash/shell.scm (%subshell) [mes]: Do not call 'restore-signals'.
---
 gash/built-ins/trap.scm | 4 +++-
 gash/shell.scm          | 4 +++-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/gash/built-ins/trap.scm b/gash/built-ins/trap.scm
index e308b50..d9d2e2e 100644
--- a/gash/built-ins/trap.scm
+++ b/gash/built-ins/trap.scm
@@ -62,7 +62,9 @@
        (for-each (lambda (condition)
                    (match (condition->signum condition)
                      (0 (set-atexit! handler))
-                     (n (sigaction n handler))))
+                     (n (cond-expand
+                         (mes #f)
+                         (else (sigaction n handler))))))
                  conditions))
      EXIT_SUCCESS)
     (_ (format (current-error-port)
diff --git a/gash/shell.scm b/gash/shell.scm
index dc77884..4f08183 100644
--- a/gash/shell.scm
+++ b/gash/shell.scm
@@ -273,7 +273,9 @@ process."
     (0 (dynamic-wind
          (lambda () #t)
          (lambda ()
-           (restore-signals)
+           (cond-expand
+            (mes #f)
+            (else (restore-signals)))
            (set-atexit! #f)
            ;; We need to preserve the status given to 'exit', so we
            ;; catch the 'quit' key here.