notid/play-clj
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add type hints

Browse Source
This commit is contained in:
oakes
2014-01-10 02:42:23 -05:00
parent c4e496f72d
commit f5c502cf86
1 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
src/play_clj/core_global.clj
View File

@@ -25,13 +25,13 @@
(defn game (defn game
[key] [key]
(case key (case key
:width (.getWidth (Gdx/graphics)) :width (.getWidth ^Graphics (Gdx/graphics))
:height (.getHeight (Gdx/graphics)) :height (.getHeight ^Graphics (Gdx/graphics))
:fps (.getFramesPerSecond (Gdx/graphics)) :fps (.getFramesPerSecond ^Graphics (Gdx/graphics))
:is-fullscreen? (.isFullscreen (Gdx/graphics)) :is-fullscreen? (.isFullscreen ^Graphics (Gdx/graphics))
:is-touched? (.isTouched (Gdx/input)) :is-touched? (.isTouched ^Input (Gdx/input))
:x (.getX (Gdx/input)) :x (.getX ^Input (Gdx/input))
:y (.getY (Gdx/input)) :y (.getY ^Input (Gdx/input))
nil)) nil))
(defmacro input-key (defmacro input-key