guile-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[PATCH] Remove redundant if in eval-string


From: Andrew Tropin
Subject: [PATCH] Remove redundant if in eval-string
Date: Tue, 25 Jun 2024 15:10:43 +0400

* module/ice-9/eval-string.scm (eval-string): If module is present, it
will be set in maybe-with-module wrapper.
---
 module/ice-9/eval-string.scm | 2 --
 1 file changed, 2 deletions(-)

diff --git a/module/ice-9/eval-string.scm b/module/ice-9/eval-string.scm
index 9cac03632..fc644c099 100644
--- a/module/ice-9/eval-string.scm
+++ b/module/ice-9/eval-string.scm
@@ -74,8 +74,6 @@
        (maybe-with-module
         module
         (lambda ()
-          (if module
-              (set-current-module module))
           (if file
               (set-port-filename! port file))
           (if line
-- 
2.45.1




reply via email to

[Prev in Thread] Current Thread [Next in Thread]