Skip to content

Commit

Permalink
Get Mouse compiling
Browse files Browse the repository at this point in the history
  • Loading branch information
process-bot committed Jul 26, 2013
1 parent 20067c4 commit e1d26d0
Showing 1 changed file with 7 additions and 1 deletion.
8 changes: 7 additions & 1 deletion libraries/Mouse.elm
Original file line number Diff line number Diff line change
@@ -1,24 +1,30 @@

module Mouse where

import Native.Mouse as M
import Native.Mouse as Native

-- The current mouse position.
position : Signal (Int,Int)
position = Native.position

-- The current x-coordinate of the mouse.
x : Signal Int
x = Native.x

-- The current y-coordinate of the mouse.
y : Signal Int
y = Native.y

-- The current state of the left mouse-button.
-- True when the button is down, and false otherwise.
isDown : Signal Bool
isDown = Native.isDown

-- True immediately after the left mouse-button has been clicked,
-- and false otherwise.
isClicked : Signal Bool
isClicked = Native.isClicked

-- Always equal to unit. Event triggers on every mouse click.
clicks : Signal ()
clicks = Native.clicks

0 comments on commit e1d26d0

Please sign in to comment.