Skip to content

Instantly share code, notes, and snippets.

@RudolfVonKrugstein

RudolfVonKrugstein/gist:3122492

Created July 16, 2012 12:45
Show Gist options
  • Save RudolfVonKrugstein/3122492 to your computer and use it in GitHub Desktop.
Save RudolfVonKrugstein/3122492 to your computer and use it in GitHub Desktop.
Download ZIP
UHC importing drawing functions
Raw
gistfile1.hs
foreign import js "%1.fillRect(%*)"
fillRect :: Context2D -> Double -> Double -> Double -> Double -> IO ()
foreign import js "%1.setFillColor(%*)"
setFillColor :: Context2D -> Double -> Double -> Double -> Double -> IO ()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment