--- /dev/null
+USING: tools.deploy.config ;
+H{
+ { deploy-name "echo" }
+ { deploy-ui? f }
+ { deploy-c-types? f }
+ { deploy-console? t }
+ { deploy-unicode? f }
+ { "stop-after-last-window?" t }
+ { deploy-io 3 }
+ { deploy-reflection 6 }
+ { deploy-word-props? f }
+ { deploy-math? t }
+ { deploy-threads? t }
+ { deploy-word-defs? f }
+}
--- /dev/null
+! Copyright (C) 2011 John Benediktsson
+! See http://factorcode.org/license.txt for BSD license
+
+USING: command-line io kernel namespaces sequences ;
+
+IN: tools.echo
+
+: -n? ( args -- ? args' )
+ [ first "-n" = ] keep over [ rest ] when ;
+
+: echo-args ( args -- )
+ -n? " " join write [ nl ] unless ;
+
+: run-echo ( -- )
+ command-line get [ nl ] [ echo-args ] if-empty ;
+
+MAIN: run-echo