;;;-*- Mode: Lisp; Package: COMMON-LISP-USER -*- ;;; ;;; Finite state transducer. ;;; (C) Paul Meurer 16.12.1997 (in-package :cl-user) (defpackage transducer (:nicknames fst) (:use common-lisp regex fsa fsa-standard standard-states standard-symbols list-sets skip-list skip-list-relations parser utils) (:export @ % * + ? seq or))