(defmacro get-goos-by-name (name)
  ;; do the lookup in the goos global environment
  (eval name)
  )

(defglobalconstant my-constant 18)

(get-goos-by-name my-constant)