;;; -*- mode: Lisp; Syntax: Common-Lisp; -*-
;;;
;;; Copyright (c) 2009 by the authors.
;;;
;;; See LICENCE for details.

(in-package :hu.dwim.def)

(def package :hu.dwim.dises
  (:use :bordeaux-threads
        :cl-containers
        :hu.dwim.common
        :hu.dwim.def
        :hu.dwim.defclass-star
        :hu.dwim.delico
        :hu.dwim.syntax-sugar
        :local-time)
  (:shadow #:finish)
  (:shadowing-import-from :hu.dwim.def
                          #:iterator)
  (:export ;; simulators
           #:simulator
           #:synchronized-simulator
           #:scheduled-function
           #:simulation-time

           ;; starting simulators
           #:run-simulator
           #:simulation-time-of

           #:*simulator*
           #:with-simulator
           #:run-with-new-simulator

           ;; schedule and friends
           #:schedule
           #:schedule-now
           #:schedule-delayed
           #:schedule-at

           #:cancel-scheduled

           #:pause-now
           #:pause-delayed
           #:pause-at

           #:finish-now
           #:finish-delayed
           #:finish-at

           #:wait

           ;; distributions
           #:exponential)
  (:readtable-setup (hu.dwim.util:enable-standard-hu.dwim-syntaxes)))