Lispインタープリタ勉強会に参加したので

LT駆動開発09の発表資料です。
https://github.com/LTDD/Sessions/wiki/LT%E9%A7%86%E5%8B%95%E9%96%8B%E7%99%BA09

中身はあまりない。
解説はこっちに。

http://blog.eiel.info/blog/2014/12/08/ltdd-09-mylisp/

Transcript

1. LispΠϯλʔϓϦλษڧձʹ ࢀՃͨ͠ͷͰ 2014-12-07 LTۦಈ։ൃ09
2. ͻΉΒ ͱ΋ͻ͜ Lisp: ॳ৺ऀ JavaScript: ॳ৺ऀ Haskell: ॳ৺ऀ
3. 11݄ͷπΠʔτ https://twitter.com/eielh/status/531672921685499904 ૣ଎΍Β͔͠·ͨ͠
4. LispΠϯλʔϓϦλษڧձʹ ࢀՃͨ͠ͷͰ
5. HaskellͰ΍ͬͯΈͨ
6. ஫ҙࣄ߲
8. Q. GC͸ʁ A. Haskell͕ͳΜͱ͔ͯ͘͠ΕΔ
9. ҎԼུ
10. ຊ୊
11. Lesson 0 • ύʔα͸ͳ͍ • JavaScriptͷ഑ྻͰදݱ • ഑ྻͰͭͬͨ͘ASTΛධՁͰ͖Δ • ࢛ଇԋࢉ͕Ͱ͖Δ
12. (+ 1 2 3) • JavaScript • [“+”, 1, 2 ,3] • Haskell • List [Symbol “+”, Number 1, Number 2, Number 3] ಈతܕγεςϜʹ᱐͞Εͯͨ
13. ·ͣ͸ύʔαʔͭ͘Γͨ͘ͳΔ
14. ͝·͔͢ͳΒ… n1 = Number 1 n2 = Number 2 n3 = Number 3 sPlus = Symbol "+" -JTU
    <T1MVT
    O
    O
    O>
15. ߦ਺ JavaScript 20ߦ Haskell 40ߦ͙Β͍
16. https://gist.github.com/eiel/af120e6f44febc875702
17. ܕఆٛ data Value = Func ([Value] -> Value) | List [Value] | Symbol String | Number Int
18. ධՁ evaluate :: Env -> Value -> Value evaluate _ (Number x) = Number x evaluate env (Symbol x) = fromMaybe nil $ HM.lookup x env evaluate _ (List []) = nil evaluate env (List (x:xs)) = case x of Symbol x' -> case fromMaybe nil $ HM.lookup x' env of x''@(Func _) -> apply env x'' xs _ -> nil _ -> nil
19. ؀ڥ type Env = HashMap String Value
20. ؔ਺ͷొ࿥ global = insert "+" plus $ HM.empty
21. + ͷ࣮૷ plus = Func plus' where number (Number x) = x plus' = Number . sum . map number
22. ؆୯ͦ͏Ͱ͢Ͷ
23. ·ͱΊ
24. ࡞Δͱݟ͑ͯ͘Δ΋ͷ͕͋Δ
25. 48࣌ؒͰSchemeΛॻ͜͏ IUUQKBXJLJCPPLTPSHXJLJ&&&"4DIFNF&&##&&
26. ͝੩ௌ͋Γ͕ͱ͏͍͟͝·ͨ͠