;;;; cl-scopes/shape/space
;;;; definitions for (spatial) registering and retrieving objects by location

(defpackage :scopes/shape/space
  (:use :common-lisp)
  (:local-nicknames (:alx :alexandria))
  (:export #:create #:put #:get #:query))

(in-package :scopes/shape/space)

(defun create ()
  (make-hash-table :test #'equalp))

(defun put (space key value)
  (setf (gethash key space) value))

(defun get (space key)
  (gethash key space))

(defun query (space pattern)
  nil)