- zebra_select_database(zh, "Default");
- zebra_init(zh);
-
- zebra_begin_trans (zh, 1);
- for (i = 0; myrec[i]; i++)
- zebra_add_record (zh, myrec[i], strlen(myrec[i]));
- zebra_end_trans (zh);
-
- expect(zh, "@attr 1=4 my", 3, &exit_code);
- expect(zh, "@attr 1=4 {my x}", 1, &exit_code);
- expect(zh, "@attr 1=4 {my x}", 1, &exit_code);
- expect(zh, "@attr 1=4 {x my}", 0, &exit_code);
- expect(zh, "@attr 1=4 {my x title}", 1, &exit_code);
- expect(zh, "@attr 1=4 {my title}", 2, &exit_code);
- expect(zh, "@attr 1=4 @and x title", 2, &exit_code);
+ init_data(zh,myrec);
+
+ Query(__LINE__,zh, "@attr 1=4 my", 3);
+ Query(__LINE__,zh, "@attr 1=4 {my x}", 1);
+ Query(__LINE__,zh, "@attr 1=4 {my x}", 1);
+ Query(__LINE__,zh, "@attr 1=4 {x my}", 0);
+ Query(__LINE__,zh, "@attr 1=4 {my x title}", 1);
+ Query(__LINE__,zh, "@attr 1=4 {my title}", 2);
+ Query(__LINE__,zh, "@attr 1=4 @and x title", 2);
+
+ /* exl=0 distance=2 order=1 relation=2 (<=), known, unit=word */
+ Query(__LINE__,zh, "@prox 0 2 1 2 k 2 my x", 2);
+
+ /* exl=0 distance=2 order=1 relation=2 (<=), known, unit=word */
+ Query(__LINE__,zh, "@prox 0 2 1 2 k 2 x my", 0);
+
+ /* exl=0 distance=2 order=0 relation=2 (<=), known, unit=word */
+ Query(__LINE__,zh, "@prox 0 2 0 2 k 2 x my", 2);
+
+ /* exl=0 distance=2 order=0 relation=3 (=), known, unit=word */
+ Query(__LINE__,zh, "@prox 0 2 1 3 k 2 my x", 1);
+
+ /* exl=1 distance=2 order=0 relation=3 (=), known, unit=word */
+ Query(__LINE__,zh, "@prox 1 2 1 3 k 2 my x", 1);