From 3d2b30f5c8bfb4363eeb676257c738dd596e6191 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Mon, 27 Jul 2020 01:07:50 +0200
Subject: Merge mod!:s functionality into set!

---
 tests/termios.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tests/termios.scm')

diff --git a/tests/termios.scm b/tests/termios.scm
index f07d20a0..3fed5da3 100755
--- a/tests/termios.scm
+++ b/tests/termios.scm
@@ -7,7 +7,7 @@
 
 ;;; Code:
 
-(((util) mod!)
+(((util) set!)
  ((vulgar termios)
   make-termios copy-termios
   lflag
@@ -22,7 +22,7 @@
 (define tty (open-input-file "/dev/tty"))
 
 (define-syntax-rule (&= lvalue val)
-  (mod! lvalue (lambda (v) (& v val))))
+  (set! lvalue = ((lambda (v) (& v val)))))
 
 (define t (make-termios))
 
-- 
cgit v1.2.3