diff --git a/examples/simple-world-program.rkt b/examples/simple-world-program.rkt new file mode 100644 index 0000000..3405f84 --- /dev/null +++ b/examples/simple-world-program.rkt @@ -0,0 +1,9 @@ +#lang planet dyoo/whalesong +(require (planet dyoo/whalesong/world)) + +(display "hello again") +(newline) + +(is-color? "red") +(is-color? "blue") +(is-color? 42) \ No newline at end of file diff --git a/examples/window-size.rkt b/examples/window-size.rkt new file mode 100644 index 0000000..8475a84 --- /dev/null +++ b/examples/window-size.rkt @@ -0,0 +1,7 @@ +#lang planet dyoo/whalesong + +(when (in-javascript-context?) + (viewport-width)) + +(when (in-javascript-context?) + (viewport-height))