PasteRack.org
Paste # 93964
2020-05-23 15:24:59

Fork as a new paste.

Paste viewed 331 times.


Embed:

#lang racket

(define (hamming list1)
  (if (null? list1)
      empty
      (cons (hamming (cdr list1)) (cons (car list1) empty)))

(hamming '(1 2 3 4))

=>

prog:3:0: read-syntax: expected a `)` to close `(`
  possible cause: indentation suggests a missing `)` before line 8
  context...:
   read-one/not-eof
   loop
   [repeats 4 more times]
   read-unwrapped-sequence17
   read-undotted
   read-syntax3
   /home/pasterack/racket73/collects/syntax/module-reader.rkt:186:17: body
   /home/pasterack/racket73/collects/syntax/module-reader.rkt:183:2: wrap-internal
   /home/pasterack/racket73/collects/racket/../syntax/module-reader.rkt:65:9: lang:read-syntax
   read-syntax3
   /home/pasterack/racket73/share/pkgs/scribble-lib/scribble/private/manual-code.rkt:112:0: get-tokens
   /home/pasterack/racket73/share/pkgs/scribble-lib/scribble/private/manual-code.rkt:56:0: typeset-code15
   "/home/pasterack/pasterack/tmp/93964/93964code.scrbl": [running body]
   temp37_0
   for-loop
   run-module-instance!125
   ...