changeset 108:520aa5fa9286

Added a couple of type hints.
author Mikhail Kryshen <mikhail@kryshen.net>
date Thu, 06 Oct 2011 16:50:42 +0300
parents 5fdb0bb99f75
children 5bb50e6661af
files src/net/kryshen/indyvon/core.clj
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/net/kryshen/indyvon/core.clj	Thu Oct 06 16:49:14 2011 +0300
+++ b/src/net/kryshen/indyvon/core.clj	Thu Oct 06 16:50:42 2011 +0300
@@ -281,14 +281,14 @@
 ;; Rendering
 ;;
 
-(defn relative-transform
+(defn ^AffineTransform relative-transform
   "Returns AffineTransform: layer context -> AWT component."
   []
   (let [tr (.getTransform *graphics*)]
     (.preConcatenate tr *inverse-initial-transform*)
     tr))
 
-(defn inverse-relative-transform
+(defn ^AffineTransform inverse-relative-transform
   "Returns AffineTransform: AWT component -> layer context."
   []
   (let [tr (.getTransform *graphics*)]