Changeset 2004

Timestamp:

11/25/07 21:12:43 (6 years ago)

Author:

cho45

Message:

lang/ruby/chokan/trunk/plugins/js_eval.rb,
lang/ruby/chokan/trunk/plugins/eval.rb:

? からはじまるように統一

Location:

lang/ruby/chokan/trunk/plugins

Files:

• eval.rb (modified) (2 diffs)
• js_eval.rb (modified) (1 diff)

lang/ruby/chokan/trunk/plugins/eval.rb

@@ -8 +8 @@
         def initialize(config, chokan)
                 super
-                @prefix = @config["prefix"] || "ruby "
+                @prefix = @config["prefix"] || "?rb "
         end
 
         def on_privmsg(prefix, channel, message)
                 case message
-                when /^#{@prefix}(.+)$/i
+                when /^#{Regexp.quote(@prefix)}(.+)$/i
                         code = Regexp.last_match[1].taint
                         ret = ""
@@ -26 +26 @@
         end
 end
+
+Lambda = Proc
+class Lambda
+        def curry
+                s = <<-EOS.gsub(/^\t{3}/, "")
+                        lambda {|al|
+                                args = [#{(1...self.arity).inject(""){|r,i|r<<"a#{i}, "}}al]
+                                self[*args]
+                        }
+                EOS
+                instance_eval (1...self.arity).inject(s) {|r,i|
+                        <<-EOS.gsub(/^\t{4}/, "")
+                                lambda {|a#{self.arity-1-i+1}|
+                                        #{r}
+                                }
+                        EOS
+                }
+        end
+
+        def curry1
+                s = self
+                lambda {|x|
+                        lambda {|*args|
+                                s[*([x]+args)]
+                        }
+                }
+        end
+end
+
+S = lambda {|x, y, z| x[z][y[z]] }.curry
+K = lambda {|x, y| x }.curry
+I = lambda {|x| x } # S[K][K]
+
+

lang/ruby/chokan/trunk/plugins/js_eval.rb

@@ -13 +13 @@
         def on_privmsg(prefix, channel, message)
                 case message
-                when /^js (.+)$/i
+                when /^\?js (.+)$/i
                         code = Regexp.last_match[1].taint
                         js_eval(code, channel)