Commit 5d065a6a authored by Per Cederqvist's avatar Per Cederqvist
Browse files

Renumber.

parent 2a70df69
......@@ -155,32 +155,32 @@ send "1027 46 6 0 100 1\n"
simple_expect "=1027 4 { $any_time 6 255 0 0 \\* $any_time 10 200 0 0 \\* $any_time 11 200 0 0 \\* $any_time 12 200 0 0 \\* }"
# foo does get-membership of foo. Should return 4 { 6 10 11 12 }.
send "1026 108 6 0 100 1 0\n"
simple_expect "=1026 4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
send "1028 108 6 0 100 1 0\n"
simple_expect "=1028 4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
# foo does query-read-texts-10 on foo and 10, 11 and 12. Should get results.
send "1028 98 6 10\n"
simple_expect "=1028 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "1029 98 6 11\n"
simple_expect "=1029 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "1030 98 6 12\n"
simple_expect "=1030 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
send "1029 98 6 10\n"
simple_expect "=1029 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "1030 98 6 11\n"
simple_expect "=1030 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "1031 98 6 12\n"
simple_expect "=1031 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
# foo does query-read-texts-old on foo and 10, 11 and 12. Should get results.
send "1031 9 6 10\n"
simple_expect "=1031 $any_time 10 200 0 0 \\*"
send "1032 9 6 11\n"
simple_expect "=1032 $any_time 11 200 0 0 \\*"
send "1033 9 6 12\n"
simple_expect "=1033 $any_time 12 200 0 0 \\*"
send "1032 9 6 10\n"
simple_expect "=1032 $any_time 10 200 0 0 \\*"
send "1033 9 6 11\n"
simple_expect "=1033 $any_time 11 200 0 0 \\*"
send "1034 9 6 12\n"
simple_expect "=1034 $any_time 12 200 0 0 \\*"
# foo does query-read-texts on foo and 10, 11 and 12. Should get results.
send "1028 107 6 10 1 0\n"
simple_expect "=1028 1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "1029 107 6 11 1 0\n"
simple_expect "=1029 2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "1030 107 6 12 1 0\n"
simple_expect "=1030 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
send "1035 107 6 10 1 0\n"
simple_expect "=1035 1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "1036 107 6 11 1 0\n"
simple_expect "=1036 2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "1037 107 6 12 1 0\n"
simple_expect "=1037 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
#
# gazonk examines foo.
......@@ -189,196 +189,196 @@ simple_expect "=1030 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
talk_to client 3
# gazonk does get-unread-confs of foo. Should return the empty list.
send "1034 52 6\n"
simple_expect "=1034 0 \\*"
send "1038 52 6\n"
simple_expect "=1038 0 \\*"
# gazonk does get-membership-10 of foo. Should return 1 { 6 }.
send "1035 99 6 0 100 1\n"
simple_expect "=1035 1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
send "1039 99 6 0 100 1\n"
simple_expect "=1039 1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
# (Just a quick check: does the renumber work properly even if we don't
# start from the beginning of the list?)
send "1036 99 6 2 100 1\n"
simple_expect "%1036 19 2"
send "1037 99 6 1 100 1\n"
simple_expect "%1037 19 1"
send "1040 99 6 2 100 1\n"
simple_expect "%1040 19 2"
send "1041 99 6 1 100 1\n"
simple_expect "%1041 19 1"
# gazonk does get-membership-old of foo. Should return 1 { 6 }.
send "1038 46 6 0 100 1\n"
simple_expect "=1038 1 { $any_time 6 255 0 0 \\* }"
send "1042 46 6 0 100 1\n"
simple_expect "=1042 1 { $any_time 6 255 0 0 \\* }"
# gazonk does get-membership of foo. Should return 1 { 6 }.
send "1035 108 6 0 100 1 0\n"
simple_expect "=1035 1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
send "1043 108 6 0 100 1 0\n"
simple_expect "=1043 1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
# (Just a quick check: does the renumber work properly even if we don't
# start from the beginning of the list?)
send "1036 108 6 2 100 1 0\n"
simple_expect "%1036 19 2"
send "1037 108 6 1 100 1 0\n"
simple_expect "%1037 19 1"
send "1044 108 6 2 100 1 0\n"
simple_expect "%1044 19 2"
send "1045 108 6 1 100 1 0\n"
simple_expect "%1045 19 1"
# gazonk does query-read-texts-10 on foo and 10, 11 and 12. All should fail.
send "1039 98 6 10\n"
simple_expect "%1039 9 10"
send "1040 98 6 11\n"
simple_expect "%1040 13 11"
send "1041 98 6 12\n"
simple_expect "%1041 13 12"
send "1046 98 6 10\n"
simple_expect "%1046 9 10"
send "1047 98 6 11\n"
simple_expect "%1047 13 11"
send "1048 98 6 12\n"
simple_expect "%1048 13 12"
# gazonk does query-read-texts-old on foo and 10, 11 and 12. 10 should fail.
send "1042 9 6 10\n"
simple_expect "%1042 9 10"
send "1043 9 6 11\n"
simple_expect "%1043 13 11"
send "1044 9 6 12\n"
simple_expect "%1044 13 12"
send "1049 9 6 10\n"
simple_expect "%1049 9 10"
send "1050 9 6 11\n"
simple_expect "%1050 13 11"
send "1051 9 6 12\n"
simple_expect "%1051 13 12"
# gazonk does query-read-texts on foo and 10, 11 and 12. All should fail.
send "1039 107 6 10 1 0\n"
simple_expect "%1039 9 10"
send "1040 107 6 11 1 0\n"
simple_expect "%1040 13 11"
send "1041 107 6 12 1 0\n"
simple_expect "%1041 13 12"
send "1052 107 6 10 1 0\n"
simple_expect "%1052 9 10"
send "1053 107 6 11 1 0\n"
simple_expect "%1053 13 11"
send "1054 107 6 12 1 0\n"
simple_expect "%1054 13 12"
#
# gazonk examines bar.
#
# gazonk does get-unread-confs of bar. Should return undefined-person.
send "1045 52 7\n"
good_bad_expect "%1045 10 7" "=0 \\*" "Bug 37"
send "1055 52 7\n"
good_bad_expect "%1055 10 7" "=0 \\*" "Bug 37"
# gazonk does get-membership-10 of bar. Should return undefined-person.
send "1046 99 7 0 100 1\n"
simple_expect "%1046 10 7"
send "1056 99 7 0 100 1\n"
simple_expect "%1056 10 7"
# gazonk does get-membership-old of bar. Should return undefined-person.
send "1047 46 7 0 100 1\n"
simple_expect "%1047 10 7"
send "1057 46 7 0 100 1\n"
simple_expect "%1057 10 7"
# gazonk does get-membership of bar. Should return undefined-person.
send "1046 108 7 0 100 1 0\n"
simple_expect "%1046 10 7"
send "1058 108 7 0 100 1 0\n"
simple_expect "%1058 10 7"
# gazonk does query-read-texts-10 on bar and 10, 11 and 12. undefined-person.
send "1048 98 7 10\n"
simple_expect "%1048 10 7"
send "1049 98 7 11\n"
simple_expect "%1049 10 7"
send "1050 98 7 12\n"
simple_expect "%1050 10 7"
send "1059 98 7 10\n"
simple_expect "%1059 10 7"
send "1060 98 7 11\n"
simple_expect "%1060 10 7"
send "1061 98 7 12\n"
simple_expect "%1061 10 7"
# gazonk does query-read-texts-old on bar and 10, 11 and 12. undefined-person.
send "1051 9 7 10\n"
simple_expect "%1051 10 7"
send "1052 9 7 11\n"
simple_expect "%1052 10 7"
send "1053 9 7 12\n"
simple_expect "%1053 10 7"
send "1062 9 7 10\n"
simple_expect "%1062 10 7"
send "1063 9 7 11\n"
simple_expect "%1063 10 7"
send "1064 9 7 12\n"
simple_expect "%1064 10 7"
# gazonk does query-read-texts on bar and 10, 11 and 12. undefined-person.
send "1048 107 7 10 1 0\n"
simple_expect "%1048 10 7"
send "1049 107 7 11 1 0\n"
simple_expect "%1049 10 7"
send "1050 107 7 12 1 0\n"
simple_expect "%1050 10 7"
send "1065 107 7 10 1 0\n"
simple_expect "%1065 10 7"
send "1066 107 7 11 1 0\n"
simple_expect "%1066 10 7"
send "1067 107 7 12 1 0\n"
simple_expect "%1067 10 7"
#
# gazonk examines citrus.
#
# gazonk does get-unread-confs of citrus. Should return the empty list.
send "1054 52 8\n"
simple_expect "=1054 0 \\*"
send "1068 52 8\n"
simple_expect "=1068 0 \\*"
# gazonk does get-membership-10 of citrus. Should return 1 { 6 }.
send "1055 99 8 0 100 1\n"
simple_expect "=1055 1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
send "1069 99 8 0 100 1\n"
simple_expect "=1069 1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
# gazonk does get-membership-old of citrus. Should return 1 { 6 }.
send "1056 46 8 0 100 1\n"
simple_expect "=1056 1 { $any_time 8 255 0 0 \\* }"
send "1070 46 8 0 100 1\n"
simple_expect "=1070 1 { $any_time 8 255 0 0 \\* }"
# gazonk does get-membership of citrus. Should return 1 { 6 }.
send "1055 108 8 0 100 1 0\n"
simple_expect "=1055 1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
send "1071 108 8 0 100 1 0\n"
simple_expect "=1071 1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
# gazonk does query-read-texts-10 on citrus and 10, 11 and 12. All fails.
send "1057 98 8 10\n"
simple_expect "%1057 9 10"
send "1058 98 8 11\n"
simple_expect "%1058 13 11"
send "1059 98 8 12\n"
simple_expect "%1059 13 12"
send "1072 98 8 10\n"
simple_expect "%1072 9 10"
send "1073 98 8 11\n"
simple_expect "%1073 13 11"
send "1074 98 8 12\n"
simple_expect "%1074 13 12"
# gazonk does query-read-texts-old on citrus and 10, 11 and 12. All fails.
send "1060 9 8 10\n"
simple_expect "%1060 9 10"
send "1061 9 8 11\n"
simple_expect "%1061 13 11"
send "1062 9 8 12\n"
simple_expect "%1062 13 12"
send "1075 9 8 10\n"
simple_expect "%1075 9 10"
send "1076 9 8 11\n"
simple_expect "%1076 13 11"
send "1077 9 8 12\n"
simple_expect "%1077 13 12"
# gazonk does query-read-texts on citrus and 10, 11 and 12. All should fail.
send "1057 107 8 10 1 0\n"
simple_expect "%1057 9 10"
send "1058 107 8 11 1 0\n"
simple_expect "%1058 13 11"
send "1059 107 8 12 1 0\n"
simple_expect "%1059 13 12"
send "1078 107 8 10 1 0\n"
simple_expect "%1078 9 10"
send "1079 107 8 11 1 0\n"
simple_expect "%1079 13 11"
send "1080 107 8 12 1 0\n"
simple_expect "%1080 13 12"
#
# foo writes a text with secret, rd-prot and public as recipients.
#
talk_to client 0
send "1063 86 [holl "foo"] 3 { 0 10 0 11 0 12 } 0 { }\n"
simple_expect "=1063 1"
send "1081 86 [holl "foo"] 3 { 0 10 0 11 0 12 } 0 { }\n"
simple_expect "=1081 1"
#
# foo examines foo
#
# foo does get-unread-confs of foo. Should return 3 { 10 11 12 }.
send "1064 52 6\n"
simple_expect "=1064 3 { 10 11 12 }"
send "1082 52 6\n"
simple_expect "=1082 3 { 10 11 12 }"
# foo does get-membership-10 of foo. Should return 4 { 6 10 11 12 }.
send "1065 99 6 0 100 1\n"
simple_expect "=1065 4 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000 }"
send "1083 99 6 0 100 1\n"
simple_expect "=1083 4 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000 }"
# foo does get-membership-old of foo. Should return 4 { 6 10 11 12 }.
send "1066 46 6 0 100 1\n"
simple_expect "=1066 4 { $any_time 6 255 0 0 \\* $any_time 10 200 0 0 \\* $any_time 11 200 0 0 \\* $any_time 12 200 0 0 \\* }"
send "1084 46 6 0 100 1\n"
simple_expect "=1084 4 { $any_time 6 255 0 0 \\* $any_time 10 200 0 0 \\* $any_time 11 200 0 0 \\* $any_time 12 200 0 0 \\* }"
# foo does get-membership of foo. Should return 4 { 6 10 11 12 }.
send "1065 108 6 0 100 1 0\n"
simple_expect "=1065 4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
send "1085 108 6 0 100 1 0\n"
simple_expect "=1085 4 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 1 $any_time 10 200 0 \\* 7 $any_time 10100000 2 $any_time 11 200 0 \\* 7 $any_time 10100000 3 $any_time 12 200 0 \\* 7 $any_time 10100000 }"
# foo does query-read-texts-10 on foo and 10, 11 and 12. Should get results.
send "1067 98 6 10\n"
simple_expect "=1067 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "1068 98 6 11\n"
simple_expect "=1068 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "1069 98 6 12\n"
simple_expect "=1069 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
send "1086 98 6 10\n"
simple_expect "=1086 1 $any_time 10 200 0 0 \\* 7 $any_time 10100000"
send "1087 98 6 11\n"
simple_expect "=1087 2 $any_time 11 200 0 0 \\* 7 $any_time 10100000"
send "1088 98 6 12\n"
simple_expect "=1088 3 $any_time 12 200 0 0 \\* 7 $any_time 10100000"
# foo does query-read-texts-old on foo and 10, 11 and 12. Should get results.
send "1070 9 6 10\n"
simple_expect "=1070 $any_time 10 200 0 0 \\*"
send "1071 9 6 11\n"
simple_expect "=1071 $any_time 11 200 0 0 \\*"
send "1072 9 6 12\n"
simple_expect "=1072 $any_time 12 200 0 0 \\*"
send "1089 9 6 10\n"
simple_expect "=1089 $any_time 10 200 0 0 \\*"
send "1090 9 6 11\n"
simple_expect "=1090 $any_time 11 200 0 0 \\*"
send "1091 9 6 12\n"
simple_expect "=1091 $any_time 12 200 0 0 \\*"
# foo does query-read-texts on foo and 10, 11 and 12. Should get results.
send "1067 107 6 10 1 0\n"
simple_expect "=1067 1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "1068 107 6 11 1 0\n"
simple_expect "=1068 2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "1069 107 6 12 1 0\n"
simple_expect "=1069 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
send "1092 107 6 10 1 0\n"
simple_expect "=1092 1 $any_time 10 200 0 \\* 7 $any_time 10100000"
send "1093 107 6 11 1 0\n"
simple_expect "=1093 2 $any_time 11 200 0 \\* 7 $any_time 10100000"
send "1094 107 6 12 1 0\n"
simple_expect "=1094 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
#
# gazonk examines foo.
......@@ -387,132 +387,132 @@ simple_expect "=1069 3 $any_time 12 200 0 \\* 7 $any_time 10100000"
talk_to client 3
# gazonk does get-unread-confs of foo. Should return the empty list.
send "1073 52 6\n"
simple_expect "=1073 0 \\*"
send "1095 52 6\n"
simple_expect "=1095 0 \\*"
# gazonk does get-membership-10 of foo. Should return 1 { 6 }.
send "1074 99 6 0 100 1\n"
simple_expect "=1074 1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
send "1096 99 6 0 100 1\n"
simple_expect "=1096 1 { 0 $any_time 6 255 0 0 \\* 6 $any_time 00000000 }"
# gazonk does get-membership-old of foo. Should return 1 { 6 }.
send "1075 46 6 0 100 1\n"
simple_expect "=1075 1 { $any_time 6 255 0 0 \\* }"
send "1097 46 6 0 100 1\n"
simple_expect "=1097 1 { $any_time 6 255 0 0 \\* }"
# gazonk does get-membership of foo. Should return 1 { 6 }.
send "1074 108 6 0 100 1 0\n"
simple_expect "=1074 1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
send "1098 108 6 0 100 1 0\n"
simple_expect "=1098 1 { 0 $any_time 6 255 0 \\* 6 $any_time 00000000 }"
# gazonk does query-read-texts-10 on foo and 10, 11 and 12. All should fail.
send "1076 98 6 10\n"
simple_expect "%1076 9 10"
send "1077 98 6 11\n"
simple_expect "%1077 13 11"
send "1078 98 6 12\n"
simple_expect "%1078 13 12"
send "1099 98 6 10\n"
simple_expect "%1099 9 10"
send "1100 98 6 11\n"
simple_expect "%1100 13 11"
send "1101 98 6 12\n"
simple_expect "%1101 13 12"
# gazonk does query-read-texts-old on foo and 10, 11 and 12. All should fail.
send "1079 9 6 10\n"
simple_expect "%1079 9 10"
send "1080 9 6 11\n"
simple_expect "%1080 13 11"
send "1081 9 6 12\n"
simple_expect "%1081 13 12"
send "1102 9 6 10\n"
simple_expect "%1102 9 10"
send "1103 9 6 11\n"
simple_expect "%1103 13 11"
send "1104 9 6 12\n"
simple_expect "%1104 13 12"
# gazonk does query-read-texts on foo and 10, 11 and 12. All should fail.
send "1076 107 6 10 1 0\n"
simple_expect "%1076 9 10"
send "1077 107 6 11 1 0\n"
simple_expect "%1077 13 11"
send "1078 107 6 12 1 0\n"
simple_expect "%1078 13 12"
send "1105 107 6 10 1 0\n"
simple_expect "%1105 9 10"
send "1106 107 6 11 1 0\n"
simple_expect "%1106 13 11"
send "1107 107 6 12 1 0\n"
simple_expect "%1107 13 12"
#
# gazonk examines bar
#
# gazonk does get-unread-confs of bar. Should return undefined-person.
send "1082 52 7\n"
good_bad_expect "%1082 10 7" "=0 \\*" "Bug 37"
send "1108 52 7\n"
good_bad_expect "%1108 10 7" "=0 \\*" "Bug 37"
# gazonk does get-membership-10 of bar. Should return undefined-person.
send "1083 99 7 0 100 1\n"
simple_expect "%1083 10 7"
send "1109 99 7 0 100 1\n"
simple_expect "%1109 10 7"
# gazonk does get-membership-old of bar. Should return undefined-person.
send "1084 46 7 0 100 1\n"
simple_expect "%1084 10 7"
send "1110 46 7 0 100 1\n"
simple_expect "%1110 10 7"
# gazonk does get-membership of bar. Should return undefined-person.
send "1083 108 7 0 100 1 0\n"
simple_expect "%1083 10 7"
send "1111 108 7 0 100 1 0\n"
simple_expect "%1111 10 7"
# gazonk does query-read-texts-10 on bar and 10, 11 and 12. undefined-person.
send "1085 98 7 10\n"
simple_expect "%1085 10 7"
send "1086 98 7 11\n"
simple_expect "%1086 10 7"
send "1087 98 7 12\n"
simple_expect "%1087 10 7"
send "1112 98 7 10\n"
simple_expect "%1112 10 7"
send "1113 98 7 11\n"
simple_expect "%1113 10 7"
send "1114 98 7 12\n"
simple_expect "%1114 10 7"
# gazonk does query-read-texts-old on bar and 10, 11 and 12. undefined-person.
send "1088 9 7 10\n"
simple_expect "%1088 10 7"
send "1089 9 7 11\n"
simple_expect "%1089 10 7"
send "1090 9 7 12\n"
simple_expect "%1090 10 7"
send "1115 9 7 10\n"
simple_expect "%1115 10 7"
send "1116 9 7 11\n"
simple_expect "%1116 10 7"
send "1117 9 7 12\n"
simple_expect "%1117 10 7"
# gazonk does query-read-texts on bar and 10, 11 and 12. undefined-person.
send "1085 107 7 10 1 0\n"
simple_expect "%1085 10 7"
send "1086 107 7 11 1 0\n"
simple_expect "%1086 10 7"
send "1087 107 7 12 1 0\n"
simple_expect "%1087 10 7"
send "1118 107 7 10 1 0\n"
simple_expect "%1118 10 7"
send "1119 107 7 11 1 0\n"
simple_expect "%1119 10 7"
send "1120 107 7 12 1 0\n"
simple_expect "%1120 10 7"
#
# gazonk examines citrus.
#
# gazonk does get-unread-confs of citrus. Should return the empty list.
send "1091 52 8\n"
simple_expect "=1091 0 \\*"
send "1121 52 8\n"
simple_expect "=1121 0 \\*"
# gazonk does get-membership-10 of citrus. Should return 1 { 6 }.
send "1092 99 8 0 100 1\n"
simple_expect "=1092 1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
send "1122 99 8 0 100 1\n"
simple_expect "=1122 1 { 0 $any_time 8 255 0 0 \\* 8 $any_time 00000000 }"
# gazonk does get-membership-old of citrus. Should return 1 { 6 }.
send "1093 46 8 0 100 1\n"
simple_expect "=1093 1 { $any_time 8 255 0 0 \\* }"
send "1123 46 8 0 100 1\n"
simple_expect "=1123 1 { $any_time 8 255 0 0 \\* }"
# gazonk does get-membership of citrus. Should return 1 { 6 }.
send "1092 108 8 0 100 1 0\n"
simple_expect "=1092 1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
send "1124 108 8 0 100 1 0\n"
simple_expect "=1124 1 { 0 $any_time 8 255 0 \\* 8 $any_time 00000000 }"
# gazonk does query-read-texts-10 on citrus and 10, 11 and 12. All fails.
send "1094 98 8 10\n"
simple_expect "%1094 9 10"
send "1095 98 8 11\n"
simple_expect "%1095 13 11"
send "1096 98 8 12\n"
simple_expect "%1096 13 12"
send "1125 98 8 10\n"
simple_expect "%1125 9 10"
send "1126 98 8 11\n"
simple_expect "%1126 13 11"
send "1127 98 8 12\n"
simple_expect "%1127 13 12"
# gazonk does query-read-texts-old on citrus and 10, 11 and 12. All fails.
send "1097 9 8 10\n"
simple_expect "%1097 9 10"
send "1098 9 8 11\n"
simple_expect "%1098 13 11"
send "1099 9 8 12\n"
simple_expect "%1099 13 12"
send "1128 9 8 10\n"
simple_expect "%1128 9 10"
send "1129 9 8 11\n"
simple_expect "%1129 13 11"
send "1130 9 8 12\n"
simple_expect "%1130 13 12"
# gazonk does query-read-texts on citrus and 10, 11 and 12. All should fail.
send "1094 107 8 10 1 0\n"
simple_expect "%1094 9 10"
send "1095 107 8 11 1 0\n"
simple_expect "%1095 13 11"
send "1096 107 8 12 1 0\n"
simple_expect "%1096 13 12"
send "1131 107 8 10 1 0\n"
simple_expect "%1131 9 10"
send "1132 107 8 11 1 0\n"
simple_expect "%1132 13 11"
send "1133 107 8 12 1 0\n"
simple_expect "%1133 13 12"
#
......@@ -521,30 +521,30 @@ simple_expect "%1096 13 12"
# foo marks the text as read
talk_to client 0
send "1100 27 10 1 { 1 }\n"
simple_expect "=1100"
send "1101 27 11 1 { 1 }\n"
simple_expect "=1101"
send "1102 27 12 1 { 1 }\n"
simple_expect "=1102"
send "1134 27 10 1 { 1 }\n"
simple_expect "=1134"
send "1135 27 11 1 { 1 }\n"
simple_expect "=1135"
send "1136 27 12 1 { 1 }\n"
simple_expect "=1136"
# bar marks the text as read
talk_to client 1
send "1103 27 10 1 { 1 }\n"
simple_expect "=1103"
send "1104 27 11 1 { 1 }\n"
simple_expect "=1104"
send "1105 27 12 1 { 1 }\n"
simple_expect "=1105"
send "1137 27 10 1 { 1 }\n"
simple_expect "=1137"
send "1138 27 11 1 { 1 }\n"
simple_expect "=1138"
send "1139 27 12 1 { 1 }\n"
simple_expect "=1139"
# citrus marks the text as read
talk_to client 2
send "1106 27 10 1 { 1 }\n"
simple_expect "=1106"
send "1107 27 11 1 { 1 }\n"
simple_expect "=1107"
send "1108 27 12 1 { 1 }\n"
simple_expect "=1108"
send "1140 27 10 1 { 1 }\n"
simple_expect "=1140"
send "1141 27 11 1 { 1 }\n"
simple_expect "=1141"
send "1142 27 12 1 { 1 }\n"
simple_expect "=1142"
#
# foo examines foo.
......@@ -553,44 +553,44 @@ simple_expect "=1108"
talk_to client 0
# foo does get-unread-confs of foo. Should return the empty list.
send "1109 52 6\n"