aboutsummaryrefslogtreecommitdiff
path: root/t/13cmpkey.c
diff options
context:
space:
mode:
Diffstat (limited to 't/13cmpkey.c')
-rw-r--r--t/13cmpkey.c72
1 files changed, 0 insertions, 72 deletions
diff --git a/t/13cmpkey.c b/t/13cmpkey.c
deleted file mode 100644
index 1e12b5c..0000000
--- a/t/13cmpkey.c
+++ /dev/null
@@ -1,72 +0,0 @@
-#include "../termkey.h"
-#include "taplib.h"
-
-int
-main (int argc, char *argv[])
-{
- termkey_t *tk;
- termkey_key_t key1, key2;
-
- plan_tests (12);
-
- tk = termkey_new_abstract ("vt100", NULL, 0);
-
- key1.type = TERMKEY_TYPE_KEY;
- key1.code.codepoint = 'A';
- key1.modifiers = 0;
-
- is_int (termkey_keycmp (tk, &key1, &key1), 0, "cmpkey same structure");
-
- key2.type = TERMKEY_TYPE_KEY;
- key2.code.codepoint = 'A';
- key2.modifiers = 0;
-
- is_int (termkey_keycmp (tk, &key1, &key2), 0, "cmpkey identical structure");
-
- key2.modifiers = TERMKEY_KEYMOD_CTRL;
-
- ok (termkey_keycmp (tk, &key1, &key2) < 0,
- "cmpkey orders CTRL after nomod");
- ok (termkey_keycmp (tk, &key2, &key1) > 0,
- "cmpkey orders nomod before CTRL");
-
- key2.code.codepoint = 'B';
- key2.modifiers = 0;
-
- ok (termkey_keycmp (tk, &key1, &key2) < 0, "cmpkey orders 'B' after 'A'");
- ok (termkey_keycmp (tk, &key2, &key1) > 0, "cmpkey orders 'A' before 'B'");
-
- key1.modifiers = TERMKEY_KEYMOD_CTRL;
-
- ok (termkey_keycmp (tk, &key1, &key2) < 0,
- "cmpkey orders nomod 'B' after CTRL 'A'");
- ok (termkey_keycmp (tk, &key2, &key1) > 0,
- "cmpkey orders CTRL 'A' before nomod 'B'");
-
- key2.type = TERMKEY_TYPE_KEYSYM;
- key2.code.sym = TERMKEY_SYM_UP;
-
- ok (termkey_keycmp (tk, &key1, &key2) < 0,
- "cmpkey orders KEYSYM after KEY");
- ok (termkey_keycmp (tk, &key2, &key1) > 0,
- "cmpkey orders KEY before KEYSYM");
-
- key1.type = TERMKEY_TYPE_KEYSYM;
- key1.code.sym = TERMKEY_SYM_SPACE;
- key1.modifiers = 0;
- key2.type = TERMKEY_TYPE_KEY;
- key2.code.codepoint = ' ';
- key2.modifiers = 0;
-
- is_int (termkey_keycmp (tk, &key1, &key2), 0,
- "cmpkey considers KEYSYM/SPACE and KEY/SP identical");
-
- termkey_set_canonflags (tk,
- termkey_get_canonflags (tk) | TERMKEY_CANON_SPACESYMBOL);
- is_int (termkey_keycmp (tk, &key1, &key2), 0,
- "cmpkey considers KEYSYM/SPACE and KEY/SP"
- " identical under SPACESYMBOL");
-
- termkey_destroy (tk);
- return exit_status ();
-}