Test output for uri-match

Testing time: 8.0s

CHICKEN_INSTALL_PREFIX=/root/src/salmonella/salmonella-4.5.0/repo CHICKEN_INCLUDE_PATH=/root/src/salmonella/salmonella-4.5.0/repo/share/chicken CHICKEN_REPOSITORY=/root/src/salmonella/salmonella-4.5.0/repo/lib/chicken/5 /usr/local/chicken-4.5.0/bin/csi -script run.scm

-- testing routes creation ---------------------------------------------------
(lset= '(GET POST) (map car routes)) ................................. [ PASS]

    -- testing expansion -----------------------------------------------------
    (lset= '(("foo") ("foo" "bar")) (map car (alist-ref 'GET routes)))  [ PASS]
    (lset= '(("foo")) (map car (alist-ref 'POST routes))) ............ [ PASS]
    2 tests completed in 0 seconds.
    2 out of 2 (100%) tests passed.
    -- done testing expansion ------------------------------------------------

1 test and 1 subgroup completed in 0.002 seconds.
1 out of 1 (100%) test passed.
1 out of 1 (100%) subgroup passed.
-- done testing routes creation ----------------------------------------------


-- testing basic matching ----------------------------------------------------
((uri-match 'GET "/" (make-routes '(((/ "") (GET "this is the b... ... [ PASS]
against the path of a uri-reference .................................. [ PASS]
(not (uri-match 'GET "/" (make-routes '(((/ "") (POST "won't re... ... [ PASS]

    -- testing with nesting --------------------------------------------------
    ((uri-match 'POST "/foo/bar" (make-routes '(((/ "foo") ((/ "bar...  [ PASS]

        -- testing with procedure body ---------------------------------------
        ((uri-match 'GET "/me" (make-routes `(((/ "me") (GET ,(lambda (...  [ PASS]
        ((uri-match 'GET "/numbers/100" (make-routes `(((/ "numbers" "(...  [ PASS]
        2 tests completed in 0.002 seconds.
        2 out of 2 (100%) tests passed.
        -- done testing with procedure body ----------------------------------

    1 test and 1 subgroup completed in 0.002 seconds.
    1 out of 1 (100%) test passed.
    1 out of 1 (100%) subgroup passed.
    -- done testing with nesting ---------------------------------------------


    -- testing with capture groups -------------------------------------------
    ((uri-match 'GET "/foo/10/5" routes)) ............................ [ PASS]
    (not (uri-match 'GET "/foo/bar/10" routes)) ...................... [ PASS]
    2 tests completed in 0.001 seconds.
    2 out of 2 (100%) tests passed.
    -- done testing with capture groups --------------------------------------


    -- testing with irregex capture groups -----------------------------------
    ((uri-match 'GET "/foo/10/5" routes)) ............................ [ PASS]
    (not (uri-match 'GET "/foo/bar/10" routes)) ...................... [ PASS]
    2 tests completed in 0.001 seconds.
    2 out of 2 (100%) tests passed.
    -- done testing with irregex capture groups ------------------------------


    -- testing with irregex named capture groups -----------------------------
    ((uri-match 'GET "/foo/10/5" routes)) ............................ [ PASS]
    ((uri-match 'GET "/foo/10/x" routes)) ............................ [ PASS]
    (not (uri-match 'GET "/foo/bar/10" routes)) ...................... [ PASS]
    3 tests completed in 0.004 seconds.
    3 out of 3 (100%) tests passed.
    -- done testing with irregex named capture groups ------------------------

3 tests and 4 subgroups completed in 0.01 seconds.
3 out of 3 (100%) tests passed.
4 out of 4 (100%) subgroups passed.
-- done testing basic matching -----------------------------------------------


-- testing matcher -----------------------------------------------------------
((matcher 'GET "/")) ................................................. [ PASS]
((matcher 'POST "/this")) ............................................ [ PASS]
((matcher 'PUT "/this/or")) .......................................... [ PASS]
3 tests completed in 0.001 seconds.
3 out of 3 (100%) tests passed.
-- done testing matcher ------------------------------------------------------


-- testing precedence --------------------------------------------------------
first come, first serve .............................................. [ PASS]
1 test completed in 0.005 seconds.
1 out of 1 (100%) test passed.
-- done testing precedence ---------------------------------------------------


-- testing a bit more complex nesting ----------------------------------------
((match 'GET "/")) ................................................... [ PASS]
((match 'GET "/some/nested")) ........................................ [ PASS]
((match 'GET (uri-reference "http://localhost/some/nested/route... ... [ PASS]
3 tests completed in 0.009 seconds.
3 out of 3 (100%) tests passed.
-- done testing a bit more complex nesting -----------------------------------


-- testing continuing matching -----------------------------------------------
((match 'PUT "/foo")) ................................................ [ PASS]
((match 'PUT "/sparta")) ............................................. [ PASS]
(not ((match 'PUT "/nothing"))) ...................................... [ PASS]
3 tests completed in 0.004 seconds.
3 out of 3 (100%) tests passed.
-- done testing continuing matching ------------------------------------------