Data update

Task/Interactive-programming-repl-/AWK/interactive-programming-repl-.awk

@@ -0,0 +1,4 @@
+GAWK -f CON
+BEGIN { print(f("Rosetta","Code",":")) }
+function f(s1,s2,s3) { return(s1 s3 s3 s2) }
+^Z   <-- CTRL-Z

Task/Interactive-programming-repl-/Emacs-Lisp/interactive-programming-repl--1.el

@@ -0,0 +1,5 @@
+(defun my-join (str1 str2 sep)
+  (concat str1 sep sep str2))
+my-join
+(my-join "Rosetta" "Code" ":")
+"Rosetta::Code"

Task/Interactive-programming-repl-/Emacs-Lisp/interactive-programming-repl--2.el

@@ -0,0 +1,7 @@
+*** Welcome to IELM ***  Type (describe-mode) for help.
+ELISP> (defun my-join (str1 str2 sep)
+	 (concat str1 sep sep str2))
+my-join
+ELISP> (my-join "Rosetta" "Code" ":")
+"Rosetta::Code"
+ELISP>

Task/Interactive-programming-repl-/PowerShell/interactive-programming-repl-.ps1

@@ -0,0 +1,10 @@
+Windows PowerShell
+Copyright (C) 2009 Microsoft Corporation. All rights reserved.
+
+PS Home:\> function f ([string] $string1, [string] $string2, [string] $separator) {
+>>     $string1 + $separator * 2 + $string2
+>> }
+>>
+PS Home:\> f 'Rosetta' 'Code' ':'
+Rosetta::Code
+PS Home:\>

Task/Interactive-programming-repl-/Rebol/interactive-programming-repl-.rebol

@@ -0,0 +1,5 @@
+$ rebol -q
+>> f: func [a b s] [print rejoin [a s s b]]
+>> f "Rosetta" "Code" ":"
+Rosetta::Code
+>> q