X-Git-Url: http://sru.miketaylor.org.uk/?a=blobdiff_plain;f=test%2Fapi%2Ft5.c;h=dc1926485db591c0c79a0ca7d4e8c9a092bd39a9;hb=fad075b9f201964d42a6869a44bd7a3e486163cd;hp=5313f87128982b51ca8aa9a194eff30ab0bc6409;hpb=3e09835371a4b88df2a4b0ab155abb01cf285a81;p=idzebra-moved-to-github.git

diff --git a/test/api/t5.c b/test/api/t5.c
index 5313f87..dc19264 100644
--- a/test/api/t5.c
+++ b/test/api/t5.c
@@ -1,4 +1,4 @@
-/* $Id: t5.c,v 1.2 2004-06-14 23:43:32 adam Exp $
+/* $Id: t5.c,v 1.3 2004-06-16 22:06:49 adam Exp $
    Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004
    Index Data Aps
 
@@ -85,6 +85,21 @@ int main(int argc, char **argv)
     expect(zh, "@attr 1=4 {my title}", 2, &exit_code);
     expect(zh, "@attr 1=4 @and x title", 2, &exit_code);
 
+    /* exl=0 distance=2 order=1 relation=2 (<=), known, unit=word */
+    expect(zh, "@prox 0 2 1 2 k 2 my x", 2, &exit_code);
+
+    /* exl=0 distance=2 order=1 relation=2 (<=), known, unit=word */
+    expect(zh, "@prox 0 2 1 2 k 2 x my", 0, &exit_code);
+
+    /* exl=0 distance=2 order=0 relation=2 (<=), known, unit=word */
+    expect(zh, "@prox 0 2 0 2 k 2 x my", 2, &exit_code);
+
+    /* exl=0 distance=2 order=0 relation=3 (=), known, unit=word */
+    expect(zh, "@prox 0 2 1 3 k 2 my x", 1, &exit_code);
+
+    /* exl=1 distance=2 order=0 relation=3 (=), known, unit=word */
+    expect(zh, "@prox 1 2 1 3 k 2 my x", 1, &exit_code);
+
     zebra_close (zh);
     zebra_stop (zs);