Attribution

diff --git a/extra/benchmark/beust2/beust2.factor b/extra/benchmark/beust2/beust2.factor
index 8f794fb1c237ba7d99d4094806a5dfb5c427b6ff..833c1fa77d1784330a0228606f794b4fe97ad49b 100644 (file)
--- a/extra/benchmark/beust2/beust2.factor
+++ b/extra/benchmark/beust2/beust2.factor
@@ -3,6 +3,8 @@
 USING: math math.ranges math.parser sequences kernel io locals ;
 IN: benchmark.beust2
 
+! http://crazybob.org/BeustSequence.java.html
+
 :: (count-numbers) ( remaining first value used max listener -- ? )
     10 first - [| i |
         [let* | digit [ i first + ]