oops, forgot a USING

basis/literals/literals.factor

@@ -19,3 +19,7 @@ PRIVATE>
 SYNTAX: $ scan-word expand-literal >vector ;
 SYNTAX: $[ parse-quotation with-datastack >vector ;
 SYNTAX: ${ \ } [ expand-literals ] parse-literal ;
+
+SYNTAX: $$
+    scan-word execute( accum -- accum ) dup pop [ >quotation ] keep
+    [ output>sequence ] 2curry call( -- object ) parsed ;

extra/window-controls-demo/window-controls-demo.factor

@@ -1,6 +1,6 @@
 ! (c)2009 Joe Groff bsd license
 USING: accessors assocs kernel locals sequences ui
-ui.gadgets.worlds ;
+ui.gadgets ui.gadgets.worlds ;
 IN: window-controls-demo
 
 CONSTANT: window-control-sets-to-test