update

Task/Send-an-unknown-method-call/Bracmat/send-an-unknown-method-call.bracmat

@@ -0,0 +1,19 @@
+(task=
+  ( oracle
+  =   (predicate="is made of green cheese")
+      (generateTruth=.str$(!arg " " !(its.predicate) "."))
+      (generateLie=.str$(!arg " " !(its.predicate) "!"))
+  )
+& new$oracle:?SourceOfKnowledge
+&   put
+  $ "You may ask the Source of Eternal Wisdom ONE thing.
+Enter \"Truth\" or \"Lie\" on the next line and press the <Enter> key.
+"
+&   whl
+  ' ( get':?trueorlie:~Truth:~Lie
+    & put$"Try again\n"
+    )
+& put$(str$("You want a " !trueorlie ". About what?" \n))
+& get'(,STR):?something
+& (SourceOfKnowledge..str$(generate !trueorlie))$!something
+);

Task/Send-an-unknown-method-call/Cache-ObjectScript/send-an-unknown-method-call.cos

@@ -0,0 +1,14 @@
+Class Unknown.Example Extends %RegisteredObject
+{
+
+Method Foo()
+{
+	Write "This is foo", !
+}
+
+Method Bar()
+{
+	Write "This is bar", !
+}
+
+}

Task/Send-an-unknown-method-call/Lua/send-an-unknown-method-call.lua

@@ -0,0 +1,5 @@
+local example = { }
+function example:foo (x) return 42 + x end
+
+local name = "foo"
+example[name](example, 5) --> 47

Task/Send-an-unknown-method-call/Racket/send-an-unknown-method-call.rkt

@@ -0,0 +1,12 @@
+#lang racket
+(define greeter
+  (new (class object% (super-new)
+         (define/public (hello name)
+           (displayln (~a "Hello " name "."))))))
+
+; normal method call
+(send greeter hello "World")
+
+; sending an unknown method
+(define unknown 'hello)
+(dynamic-send greeter unknown "World")