benz.scm

September 21, 2014 ยท View on GitHub

(define-library (picrin base)

(export define lambda if quote set! begin define-syntax)

(export syntax-error let-syntax letrec-syntax)

(export let let* letrec letrec* quasiquote unquote unquote-splicing and or cond case => else do when unless)

(export let-values let*-values define-values)

(export eq? eqv? equal?)

(export boolean? boolean=? not)

(export symbol? symbol->string string->symbol symbol=?)

(export char? char->integer integer->char char=? char<? char>? char<=? char>=?)

(export number? complex? real? rational? integer? exact? inexact? = < > <= >= + - * / abs floor/ truncate/ floor ceiling truncate round expt number->string string->number finite? infinite? nan? exp log sin cos tan acos asin atan sqrt)

(export pair? cons car cdr set-car! set-cdr! null? caar cadr cdar cddr)

(export list? make-list list length append reverse list-tail list-ref list-set! list-copy map for-each memq memv member assq assv assoc)

(export bytevector? bytevector make-bytevector bytevector-length bytevector-u8-ref bytevector-u8-set! bytevector-copy bytevector-copy! bytevector-append bytevector->list list->bytevector)

(export vector? vector make-vector vector-length vector-ref vector-set! vector-copy! vector-copy vector-append vector-fill! vector-map vector-for-each list->vector vector->list string->vector vector->string)

(export string? string make-string string-length string-ref string-copy string-append string-map string-for-each string->list list->string string=? string<? string>? string<=? string>=?)

(export make-dictionary dictionary? dictionary dictionary-ref dictionary-set! dictionary-delete! dictionary-size dictionary->plist plist->dictionary dictionary->alist alist->dictionary)

(export make-record record? record-type record-ref record-set!)

(export current-input-port current-output-port current-error-port

      call-with-port

      port?
      input-port?
      output-port?
      textual-port?
      binary-port?

      port-open?
      close-port

      open-input-file
      open-output-file
      open-binary-input-file
      open-binary-output-file
      open-input-string
      open-output-string
      get-output-string
      open-input-bytevector
      open-output-bytevector
      get-output-bytevector

      eof-object?
      eof-object

      read-char
      peek-char
      char-ready?
      read-line
      read-string

      read-u8
      peek-u8
      u8-ready?
      read-bytevector
      read-bytevector!

      newline
      write-char
      write-string
      write-u8
      write-bytevector
      flush-output-port)

(export make-parameter parameterize)

(export identifier? identifier=? make-identifier)

(export call-with-current-continuation call/cc dynamic-wind values call-with-values)

(export with-exception-handler raise raise-continuable error make-error-object error-object? error-object-message error-object-irritants error-object-type)

(export procedure? apply attribute)

(export read)

(export write write-simple write-shared display)

(export command-line exit emergency-exit file-exists? delete-file get-environment-variable get-environment-variables)

(export current-second current-jiffy jiffies-per-second)

(export eval)

(export load))