factor/library/test/words.factor

IN: scratchpad
USE: math
USE: test
USE: words

[ 4 ] [
    "poo" "scratchpad" create [ 2 2 + ] define-compound
    "poo" [ "scratchpad" ] search execute
] unit-test
define-compound 2004-08-19 19:36:28 -04:00			`IN: scratchpad`
fix some overflow issues 2004-08-26 22:21:17 -04:00			`USE: math`
define-compound 2004-08-19 19:36:28 -04:00			`USE: test`
			`USE: words`

			`[ 4 ] [`
			`"poo" "scratchpad" create [ 2 2 + ] define-compound`
			`"poo" [ "scratchpad" ] search execute`
			`] unit-test`