From 94f089316ffbf2e2e74b0257355f7c390ff5262b Mon Sep 17 00:00:00 2001 From: Aleksey Veresov Date: Tue, 5 Jan 2021 16:54:50 +0300 Subject: Added sx. --- examples/generated.csx | 16 ++++------------ 1 file changed, 4 insertions(+), 12 deletions(-) (limited to 'examples') diff --git a/examples/generated.csx b/examples/generated.csx index 4c405c4..f6eac72 100644 --- a/examples/generated.csx +++ b/examples/generated.csx @@ -9,26 +9,18 @@ ] ] ]]] -[set map [fn [f l] [if [no l] [] - [pair [f [head l]] [map f [tail l]]] -]]] +[set map [fn [f l] [if l [pair [f [head l]] [map f [tail l]]]]]] [set id [fn args args]] -[set outstr [fn [str] [if str - [do [out [head str]] [outstr [tail str]]] - [] -]]] +[set outstr [fn [str] [if str [do [out [head str]] [outstr [tail str]]]]]] [set newline [fn [] [out 10]]] [set instr [fn [] [set c [in]] - [if [same c 10] - [] - [pair c [instr]] - ] + [if [no [same c 10]] [pair c [instr]]] ]] [outstr "-= loaded =-"] [newline] -[outstr "Hello, I am Conrad S. Xylander. What is your name?"] +[outstr "Hello, I am Casey Shawn Exton. What is your name?"] [newline] [outstr "> "] [set name [instr]] -- cgit v1.2.3