;;;   -*- Mode: LISP; Package: CL-USER; BASE: 10; Syntax: ANSI-Common-Lisp; -*-

(in-package "CL-USER")

(defpackage "STRING-NET"
  (:use "COMMON-LISP" "UTILS" "SKIP-LIST")
  (:export
   "STRING-NET" "BIT-STRING-NET" "LIST-NET" "LOAD-STRING-NET" "MATCH-STRING"
   "NMAP-STRING+ARRAY-VALUES" "DECOMPRESS-STRING" "STRING-VALUES"
   "NMAP-STRINGS" "BIT-GET-ARC" "MINIMIZE-NET" "ADD-STRING"
   "STRING-DIFFERENCE" "READ-NET"))

(eval-when (:load-toplevel :compile-toplevel :execute)
  (pushnew :string-net *features*))