summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-05-02 08:59:57 +0200
committerLudovic Courtès <ludo@gnu.org>2016-05-03 17:45:29 +0200
commita8f3424b25cbbc585126420bcc1434c4a2398588 (patch)
tree3077ac67697d9cb2cff83383239efe351b3fb7ae /tests
parent0a17fd7c0b82ac315b68c88e6f206e0051dcd661 (diff)
syscalls: Wrap TCSA* constants in 'tcsetattr-action' macro.
* guix/build/syscalls.scm (tcsetattr-action): New macro. (TCSANOW, TCSADRAIN, TCSAFLUSH): Remove. (tcsetattr): Adjust docstring accordingly. * tests/syscalls.scm ("tcsetattr"): Adjust accordingly.
Diffstat (limited to 'tests')
-rw-r--r--tests/syscalls.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/syscalls.scm b/tests/syscalls.scm
index ab1e13984d..0b73fb4b0c 100644
--- a/tests/syscalls.scm
+++ b/tests/syscalls.scm
@@ -281,7 +281,7 @@
(test-assert "tcsetattr"
(let ((first (tcgetattr 0)))
- (tcsetattr 0 TCSANOW first)
+ (tcsetattr 0 (tcsetattr-action TCSANOW) first)
(equal? first (tcgetattr 0))))
(test-assert "terminal-window-size ENOTTY"