eval.in

Paste #882999

Racket — Racket 6.10.1, pasted 1 month ago (json)

1
2
3
4
5
6
7
8
#lang racket

(define (make-greeter name)
  (λ ()
    (displayln (format "Hello, ~a!" name))))

(define greeter (make-greeter "Charlie"))
(greeter)

Program Output

Hello, Charlie!

OK (0.804 sec real, 0.994 sec wall, 56 MB, 13004 syscalls)

Fork