PasteRack.org
Paste # 24998
2017-06-16 14:54:01

Fork as a new paste.

Paste viewed 33 times.


Embed:

  1. #lang racket
  2. (define (ewords sent)
  3.        (cond ((empty? sent ) '())
  4.          ((number? 'e (first sent))
  5.            (sentence (first sent) (ewords (bf sent))))
  6.          (else (ewords (bf sent)))))
  7.  
  8. (ewords '(get to the lol get))

=>

number?: arity mismatch;

 the expected number of arguments does not match the given

number

  expected: 1

  given: 2

  arguments...:

   'e

   'get