steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

talks.[otug|minneapolis]-talk: add the <iota> constructor to numbers

factor-shell
Alexander Iljin 2017-10-05 22:29:29 +03:00
parent 69f6844fea
commit 9a801c3cfe
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/talks/minneapolis-talk/minneapolis-talk.factor
View File

@ -105,7 +105,7 @@ CONSTANT: minneapolis-slides
} }
"It is slow:" "It is slow:"
{ $code { $code
"35 [ fib ] map ." "35 <iota> [ fib ] map ."
} }
"Let's profile it!" "Let's profile it!"
} }
@ -126,7 +126,7 @@ CONSTANT: minneapolis-slides
} }
"It is faster:" "It is faster:"
{ $code { $code
"35 [ fib ] map ." "35 <iota> [ fib ] map ."
} }
} }
{ $slide "The Factor UI" { $slide "The Factor UI"

2
extra/talks/otug-talk/otug-talk.factor
View File

@ -66,7 +66,7 @@ CONSTANT: otug-slides
{ $slide "Combinators" { $slide "Combinators"
{ "A " { $emphasis "combinator" } " is a word taking quotations as input" } { "A " { $emphasis "combinator" } " is a word taking quotations as input" }
{ "Used for control flow, data flow, iteration" } { "Used for control flow, data flow, iteration" }
{ $code "100 [ 5 mod 3 = [ \"Fizz!\" print ] when ] each" } { $code "100 <iota> [ 5 mod 3 = [ \"Fizz!\" print ] when ] each" }
{ "Control flow: " { $link if } ", " { $link when } ", " { $link unless } ", " { $link cond } } { "Control flow: " { $link if } ", " { $link when } ", " { $link unless } ", " { $link cond } }
{ "Iteration: " { $link map } ", " { $link filter } ", " { $link all? } ", ..." } { "Iteration: " { $link map } ", " { $link filter } ", " { $link all? } ", ..." }
} }