Skip to content
Browse files

Revert "add ajax monad as an example"

This reverts commit 5f06aa2.

Reverting until we can get the example working on the website.
  • Loading branch information...
1 parent 154fce2 commit dac1a0912a53925fa6c0ad7a7aa23ea318a029de @puffnfresh puffnfresh committed Dec 4, 2011
Showing with 0 additions and 16 deletions.
  1. +0 −15 examples/ajaxmonad.roy
  2. +0 −1 site/index.htm
View
15 examples/ajaxmonad.roy
@@ -1,15 +0,0 @@
-type Request = {url: String, payload: String}
-
-let ajaxRequest = {
- return: fn x = x
- bind: fn (x : Request) f =
- $.ajax x.url x.payload f
-}
-
-let v = (do ajaxRequest
- bind value = {url: '/url/', payload: 'stuff'}
- console.log value
- return value
-)
-
-console.log v
View
1 site/index.htm
@@ -103,7 +103,6 @@
<option value="data">Tagged unions</option>
<option value="structural">Structural</option>
<option value="tracemonad">Tracing monad</option>
- <option value="ajaxmonad">Ajax monad</option>
</select>
</div>
<textarea id="roycode" rows="15" cols="60"></textarea>

0 comments on commit dac1a09

Please sign in to comment.
Something went wrong with that request. Please try again.