#!r6rs
(library (re (0))
  (export match)
  (import (rnrs base (6))
          (ice-9 regex))
  (define (match s pat)
    (string-match pat s)))