Skip to content

Instantly share code, notes, and snippets.

@takikawa
Created May 21, 2013 20:51
Show Gist options
  • Save takikawa/5623149 to your computer and use it in GitHub Desktop.
Save takikawa/5623149 to your computer and use it in GitHub Desktop.
#lang r6rs
(library (irregex)
(export irregex string->irregex sre->irregex string->sre
maybe-string->sre irregex? irregex-match-data?
irregex-new-matches irregex-reset-matches! irregex-search
irregex-search/matches irregex-match
irregex-search/chunked irregex-match/chunked
make-irregex-chunker irregex-match-substring
irregex-match-subchunk ;irregex-match-start-source
irregex-match-start-index ;irregex-match-end-source
irregex-match-end-index irregex-match-num-submatches
irregex-match-names irregex-match-valid-index?
irregex-fold irregex-replace irregex-replace/all
irregex-dfa irregex-dfa/search
irregex-nfa irregex-flags irregex-lengths irregex-names
irregex-num-submatches irregex-extract irregex-split)
(import (rnrs base)
(except (rnrs lists-6) find filter remove)
(rnrs unicode-6)
(rnrs mutable-strings-6)
(rnrs mutable-pairs-6)
(rnrs r5rs-6)
(rnrs control-6)
(racket include))
(include "irregex.scm"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment