;;; -*- Mode:LISP; Package:HEARTS; Base:10; Readtable:CL -*-

(defsystem hearts
  (:name "Hearts Game")
  (:pathname-default "DJ:SAZ.HEARTS;")
  (:package hearts)
  (:module structures "STRUCTS")
  (:module accessors "ACCESSORS")
  (:module mutators "MUTATORS")
  (:module constants "CONSTANTS")
; (:module display "DISPLAY")
; (:module control "CONTROL")
  (:compile-load structures)
  (:compile-load constants (:fasload structures))
  (:compile-load accessors (:fasload structures))
  (:compile-load mutators (:fasload structures))
; (:compile-load display (:fasload structures))
; (:compile-load control (:fasload structures))
  )