PageRenderTime 93ms CodeModel.GetById 69ms app.highlight 20ms RepoModel.GetById 1ms app.codeStats 0ms

/extra/minneapolis-talk/minneapolis-talk.factor

http://github.com/abeaumont/factor
Unknown | 182 lines | 176 code | 6 blank | 0 comment | 0 complexity | 0157c4be661a9978f8db412f96f8c2f4 MD5 | raw file
  1USING: slides help.markup math arrays hashtables namespaces
  2sequences kernel parser memoize ;
  3IN: minneapolis-talk
  4
  5CONSTANT: minneapolis-slides
  6{
  7    { $slide "What is Factor?"
  8        "Dynamically typed, stack language"
  9        "Have our cake and eat it too"
 10        "Research -vs- production"
 11        "High level -vs- performance"
 12        "Interactive -vs- stand-alone apps"
 13    }
 14    { $slide "The view from 10,000 feet"
 15        "Influenced by Forth, Lisp, Joy, Smalltalk, even Java..."
 16        "Vocabularies: modules"
 17        "Words: named functions, classes, variables"
 18        "Combinators: higher-order functions"
 19        "Quotations: anonymous functions"
 20    }
 21    { $slide "Stack-based programming"
 22        { "Most languages are " { $emphasis "applicative" } }
 23        "Words pop inputs from the stack and push outputs on the stack"
 24        "Literals are pushed on the stack"
 25        { $code "{ 1 2 } { 7 } append reverse sum ." }
 26    }
 27    { $slide "Stack-based programming"
 28        "With the stack you can omit unnecessary names"
 29        "You can still name things: lexical/dynamic variables, sequences, associations, objects, ..."
 30    }
 31    { $slide "Functional programming"
 32        "A quotation is a sequence of literals and words"
 33        "Combinators replace imperative-style loops"
 34        "A simple example:"
 35        { $code "10 [ \"Hello world\" print ] times" }
 36        { "Partial application: " { $link curry } }
 37        { $code "{ 3 1 3 3 7 } [ 5 + ] map ." }
 38        { $code "{ 3 1 3 3 7 } 5 [ + ] curry map ." }
 39    }
 40    { $slide "Word definitions"
 41        { $code ": name ( inputs -- outputs )"
 42        "    definition ;" }
 43        "Stack effect comments document stack inputs and outputs."
 44        "Example from previous slide:"
 45        { $code ": add-each ( seq n -- newseq )"
 46        "    [ + ] curry map ;" }
 47        { $code "{ 3 1 3 3 7 } 5 add-each ." }
 48    }
 49    { $slide "Object-oriented programming"
 50        { "Define a tuple class and a constructor:"
 51        { $code
 52            "TUPLE: person name address ;"
 53            "C: <person> person"
 54        } }
 55        { "Create an instance:"
 56        { $code
 57            "\"Cosmo Kramer\""
 58            "\"100 Blah blah St, New York\""
 59            "<person>"
 60        } }
 61    }
 62    { $slide "Object-oriented programming"
 63        "We can inspect it and edit objects"
 64        "We can reshape the class!"
 65        { $code "TUPLE: person" "name address age phone-number ;" }
 66        { $code "TUPLE: person" "name address phone-number age ;" }
 67    }
 68    { $slide "An example"
 69        { $code
 70            "TUPLE: square dimension ;"
 71            "C: <square> square"
 72            ""
 73            "TUPLE: circle radius ;"
 74            "C: <circle> circle"
 75            ""
 76            "TUPLE: rectangle width height ;"
 77            "C: <rectangle> rectangle"
 78        }
 79    }
 80    STRIP-TEASE:
 81        $slide "An example"
 82        { $code
 83            "USE: math.constants"
 84            "GENERIC: area ( shape -- meters^2 )"
 85            "M: square area square-dimension sq ;"
 86            "M: circle area circle-radius sq pi * ;"
 87            "M: rectangle area"
 88            "    dup rectangle-width"
 89            "    swap rectangle-height * ;"
 90        }
 91    ;
 92
 93    { $slide "An example"
 94        { $code "10 <square> area ." }
 95        { $code "18 <circle> area ." }
 96        { $code "20 40 <rectangle> area ." }
 97    }
 98    { $slide "Meta language"
 99        "Here's fibonacci:"
100        { $code
101            ": fib ( x -- y )"
102            "    dup 1 > ["
103            "        1 - dup fib swap 1 - fib +"
104            "    ] when ;"
105        }
106        "It is slow:"
107        { $code
108            "35 [ fib ] map ."
109        }
110        "Let's profile it!"
111    }
112    { $slide "Memoization"
113        { { $link POSTPONE: : } " is just another word" }
114        "What if we could define a word which caches its results?"
115        { "The " { $vocab-link "memoize" } " library provides such a feature" }
116        { "Just change " { $link POSTPONE: : } " to " { $link POSTPONE: MEMO: } }
117    }
118    { $slide "Memoization"
119        { $code
120            "USE: memoize"
121            ""
122            "MEMO: fib ( x -- y )"
123            "    dup 1 > ["
124            "        1 - dup fib swap 1 - fib +"
125            "    ] when ;"
126        }
127        "It is faster:"
128        { $code
129            "35 [ fib ] map ."
130        }
131    }
132    { $slide "The Factor UI"
133        "Written in Factor"
134        "Renders with OpenGL"
135        "Backends for Windows, X11, Cocoa"
136        "You can call Windows, X11, Cocoa APIs directly too"
137        "OpenGL 2.1 shaders, OpenAL 3D audio..."
138    }
139    { $slide "Live coding demo"
140        
141    }
142    { $slide "C library interface"
143        "Efficient"
144        "No need to write C code"
145        "Supports floats, structs, unions, ..."
146        "Function pointers, callbacks"
147    }
148    { $slide "Live coding demo"
149        
150    }
151    { $slide "Deployment"
152        { "Let's play " { $vocab-link "tetris" } }
153    }
154    { $slide "Implementation"
155        "Portable: Windows, Mac OS X, Linux"
156        "Non-optimizing compiler"
157        "Optimizing compiler: x86, x86-64, PowerPC, ARM"
158        "Generational garbage collector"
159        "Non-blocking I/O"
160    }
161    { $slide "Some statistics"
162        "VM: 11,800 lines of C"
163        "Core library: 22,600 lines of Factor"
164        "Docs, tests, extra libraries: 117,000 lines of Factor"
165    }
166    { $slide "But wait, there's more!"
167        "Web server and framework, syntax highlighting, Ogg Theora video, SMTP, embedded Prolog, efficient unboxed arrays, XML, Unicode 5.0, memory mapped files, regular expressions, LDAP, database access, coroutines, Factor->JavaScript compiler, JSON, pattern matching, advanced math, parser generators, serialization, RSS/Atom, ..."
168    }
169    { $slide "Community"
170        "Factor development began in 2003"
171        "About a dozen contributors"
172        "Handful of \"core contributors\""
173        { "Web site: " { $url "http://factorcode.org" } }
174        "IRC: #concatenative on irc.freenode.net"
175        "Mailing list: factor-talk@lists.sf.net"
176    }
177    { $slide "Questions?" }
178}
179
180: minneapolis-talk ( -- ) minneapolis-slides slides-window ;
181
182MAIN: minneapolis-talk