Make Window work
This commit is contained in:
parent
2a5bee06fc
commit
7d00618169
1 changed files with 4 additions and 1 deletions
|
@ -1,14 +1,17 @@
|
|||
|
||||
module Window where
|
||||
|
||||
import Native.Window as W
|
||||
import Native.Window as Native
|
||||
|
||||
-- The current dimensions of the window (i.e. the area viewable to the
|
||||
-- user, not including scroll bars).
|
||||
dimensions : Signal (Int,Int)
|
||||
dimensions = Native.dimensions
|
||||
|
||||
-- The current width of the window.
|
||||
width : Signal Int
|
||||
width = Native.width
|
||||
|
||||
-- The current height of the window.
|
||||
height : Signal Int
|
||||
height = Native.height
|
||||
|
|
Loading…
Reference in a new issue