|#74on PLDB||29Years Old||18kRepos|
Racket is a general purpose, multi-paradigm programming language in the Lisp-Scheme family. One of its design goals is to serve as a platform for language creation, design, and implementation. The language is used in a variety of contexts such as scripting, general-purpose programming, computer science education, and research. Read more on Wikipedia...
#lang racket/base (display "Hello, world!\n")
#lang racket "Hello World"
;; Hello world in Racket #lang racket/base "Hello, World!"
; Clean, simple and efficient code -- that's the power of Racket! ; http://racket-lang.org/ (define (bottles n more) (printf "~a bottle~a of beer~a" (case n [(0) "no more"] [(1) "1"] [else n]) (if (= n 1) "" "s") more)) (for ([n (in-range 99 0 -1)]) (bottles n " on the wall, ") (bottles n ".\n") (printf "Take one down and pass it around, ") (bottles (sub1 n) " on the wall.\n\n")) (displayln "No more bottles of beer on the wall, no more bottles of beer.") (displayln "Go to the store and buy some more, 99 bottles of beer on the wall.")
#lang typed/racket (: fact (Integer -> Integer)) (define (fact n) (cond [(zero? n) 1] [else (* n (fact (- n 1)))]))
; A comment
(module nest racket (provide (for-syntax meta-eggs) (for-meta 1 meta-chicks) num-eggs) (define-for-syntax meta-eggs 2) (define-for-syntax meta-chicks 3) (define num-eggs 2))
(+ 1 2 3)
(mixin (interface-expr ...) (interface-expr ...) class-clause ...)
; https://docs.racket-lang.org/guide/macros.html (define-syntax-rule (swap x y) (let ([tmp x]) (set! x y) (set! y tmp)))
(require (prefix-in tcp: racket/tcp))
;; Some programming languages allow the symbol table to be manipulated at run-time, so that symbols can be added at any time.
|Case Insensitive Identifiers||X|