(provide 'sxpath)

(module sxpath
  (sxpath if-sxpath car-sxpath if-car-sxpath sxml:id-alist)

(import chicken scheme (only srfi-1 filter)
        (only srfi-13 string-prefix-ci? string-contains))

(require-extension sxpath-lolevel)
(require-extension txpath)

(define (substring? pattern str) (string-contains str pattern))

(include "chicken/common.scm")

(include "sxml-tools/sxpath.scm")
)