Fix monitor errors on startup

basis/io/monitors/freebsd/freebsd.factor

@@ -1,3 +1,16 @@
+USING: kernel io.backend io.monitors io.monitors.recursive
+io.files io.pathnames io.buffers io.ports io.timeouts
+io.backend.unix io.encodings.utf8 assocs namespaces make
+sequences locals system destructors accessors o;
 IN: io.monitors.freebsd
 
-! Empty for now
+TUPLE: freebsd-monitor < monitor handle ;
+
+M:: freebsd (monitor) ( path recursive? mailbox -- monitor )
+    path normalize-path :> path
+    path mailbox freebsd-monitor new-monitor ;
+
+M: freebsd-monitor dispose*
+    [ handle>> dispose ] [ call-next-method ] bi ;
+
+freebsd set-io-backend