Sha256: cf4d7993e546c023e2ad11fbbceee183d5b863da190a5140d176c8c116f88545

Contents?: true

Size: 1.15 KB

Versions: 1

Compression:

Stored size: 1.15 KB

Contents

(examples-for colon-syntax
  ("expands to sequential function application"
   (pre-compile 'a:b)
   (fn args (a (apply b args))))

  ("example with car:cdr"
   (car:cdr '(a b c))
   b)

  ("dislikes no-prefix"
   (on-err (joinstr "\n" errors)
           (pre-compile (car (parse "(:foo 1 2 3)"))))
   "expanding
(colon-syntax || foo)
with
NydpGenerated_D5FEA04F6E33706A6789A4F7BD15E937C3CFFAF5C16B89D54087F38BD4E594D1.rb:24
(fn names ((orf (hash-get colon-syntax-overrides (car names)) default-colon-syntax) names))
Irregular ': syntax: got (|| foo) : not prefix-syntax : in :foo"))

(examples-for prefix-list
  ("one argument"
   (map λa(len a.name)
        (list { name "bob" } { name "willy" } { name "pteradactyl" }))
   (3 5 11))

  ("with two args"
   (reduce λxy(joinstr ":" x y)
           '(a b c d e f))
   "a:b:c:d:e:f")

  ("with no args"
   (let x 15
     (let y λ(* x x)
       (y)))
   225)

  ("with two args, to be sure"
   (λpq(+ p (* p q)) 3 5)
   18))

(examples-for tilde-prefix-expansion
  ("tilde expands to to-string"
   (with (a (to-string (date "2004-03-12"))
          b ~(date "2004-03-12"))
     (list a b))
   ("2004-03-12" "2004-03-12")))

Version data entries

1 entries across 1 versions & 1 rubygems

Version Path
nydp-0.6.0 lib/lisp/tests/syntax-tests.nydp