personal-helpers/helpful.sld

(define-library (macduffie helpful)
  ;; This is a general library of procedures I find useful that don't
  ;; fit in any particular library.
  (import
    (scheme base)
    (scheme case-lambda)
    (scheme char)
    (scheme complex)
    (scheme inexact)
    (scheme write)
    (scheme read)
    (scheme file)
    (srfi 1))
  (export value->procedure assq-ref assv-ref assoc-ref
          print memoize memoize-testing atom? flatten
          pair-conjugate complex-conjugate integer->hex integer->bin
          bin->integer hex->integer hex->bin bin->hex
          color-string->triplet triplet->color-string
          list->procedure vector->procedure string->procedure
          assq->procedure assv->procedure assoc->procedure
          test-for-each? properize improperize assert logging
          read-entire-file join op-table snoc combine symbol-list->string
          curry uncurry papply left-papply right-papply pmap
          list-set concordance concord= concordq concordv
          vector-apply string-apply to-fixed to-exponential
          pipe pad-left pad-right list-split string-split iden
          inc dec alist-mapper repeated)
  (include "helpful.body.scm"))