Add example to probe purescript-refs C FFI

examples/bower.json

@@ -12,7 +12,8 @@
     "purescript-console": "pure-c/purescript-console#master",
     "purescript-control": "pure-c/purescript-control#master",
     "purescript-effect": "pure-c/purescript-effect#master",
-    "purescript-math": "pure-c/purescript-math#master"
+    "purescript-math": "pure-c/purescript-math#master",
+    "purescript-refs": "pure-c/purescript-refs#master"
   },
   "resolutions": {
     "purescript-effect": "master",

examples/refs/Main.purs

@@ -0,0 +1,20 @@
+module Main where
+
+import Prelude
+
+import Effect (Effect)
+import Effect.Console as Console
+import Effect.Ref as Ref
+
+main :: Effect Unit
+main = do
+  ref <- Ref.new "new"
+  run "Ref.new" =<< Ref.read ref
+  Ref.modify_ (const "modify_") ref
+  run "Ref.modify_" =<< Ref.read ref
+  Ref.write "write" ref
+  run "Ref.write" =<< Ref.read ref
+  where
+  run label result =
+    Console.log $
+      "[" <> label <> "]: " <> show result

examples/refs/Makefile

@@ -0,0 +1,14 @@
+default: main
+.PHONY: default
+
+PUREC_DIR := ../..
+export PATH := $(PUREC_DIR)/node_modules/.bin:$(PATH)
+include $(PUREC_DIR)/mk/target.mk
+
+SHELL := /bin/bash
+srcs := .
+deps := $(shell\
+	find ../bower_components/purescript-{control,effect,prelude,console,refs}/src/\
+	    -type f\
+	    -name '*.purs')
+$(eval $(call purs_mk_target,main,Main,$(srcs),$(deps)))

scripts/bower-depgraph

@@ -12,6 +12,7 @@ completed_ffi_for=(
 	purescript-effect
 	purescript-assert
 	purescript-math
+	purescript-refs
 )
 
 function has_completed_ffi {