]> gitweb.factorcode.org Git - factor.git/commitdiff
random.data: make constants available to random.data.
authorJohn Benediktsson <mrjbq7@gmail.com>
Sun, 5 Aug 2012 02:17:56 +0000 (19:17 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Sun, 5 Aug 2012 02:17:56 +0000 (19:17 -0700)
basis/random/data/data.factor

index 81ed1d20cc3821ddd6e9d30a72f62fd3739f72c0..60099ebcaf29c99935230d88f1cac13f3a9c599f 100644 (file)
@@ -4,8 +4,10 @@ USING: combinators combinators.random effects.parser kernel
 literals math random sequences ;
 IN: random.data
 
+<<
 CONSTANT: digits-count 10
 CONSTANT: letters-count 26
+>>
 
 : random-digit ( -- ch )
     digits-count random CHAR: 0 + ;