;;; Abbrev library for R7RS Scheme.
;;; Calculate the set of unique abbreviations for a given set of 
;;; words.  (Borrowed from Ruby's Abbrev.)

;;; SPDX-License-Identifier: LicenseRef-OWL-0.9.4
;;; SPDX-FileCopyrightText: (c) 2017 Peter Lane
;;; SPDX-FileCopyrightText: (c) 2025 afiw <afiw@linuxposting.xyz>

(define-library (abbrev)
  (import (scheme base)
          (only (srfi-1) remove)
          (only (srfi-13) string-prefix?))
  (export abbrev)
  (include "abbrev.scm"))