Recent public codes are listed below. You can filter them by the following programming languages:
- view
- All
- Ada
- Assembler
- Assembler
- AWK (gawk)
- AWK (mawk)
- Bash
- bc
- Brainf**k
- C
- C#
- C++
- C++0x
- C99 strict
- CLIPS
- Clojure
- COBOL
- COBOL 85
- Common Lisp (clisp)
- D (dmd)
- Erlang
- F#
- Factor
- Falcon
- Forth
- Fortran
- Go
- Groovy
- Haskell
- Icon
- Intercal
- Java
- JavaScript (rhino)
- JavaScript (spidermonkey)
- Lua
- Nemerle
- Nice
- Nimrod
- Objective-C
- Ocaml
- Oz
- Pascal (fpc)
- Pascal (gpc)
- Perl
- Perl 6
- PHP
- Pike
- Prolog (gnu)
- Prolog (swi)
- Python
- Python 3
- R
- Ruby
- Scala
- Scheme (guile)
- Smalltalk
- SQL
- Tcl
- Text
- Unlambda
- VB.NET
- Whitespace
-
1
(display (1 2 3))
-
1
(display "hello\nworld\n")
-
1
(display "hello")
-
1 2 3
(define foo 5) (foo)
-
1 2 3 4 5 6 7 8 9
<xsd:schema xmlns:xsd="http://www.w3.org/2001/XMLSchema"> <xsd:element name="FacultyofArtsandHumanities"> <xsd:complexType> <xsd:sequence> <xsd:element name="Department"> <xsd:complexType> <xsd:sequence> <xsd:element name="FullName"> </xsd:element> <xsd:element name="Address"> </xsd:element>
...
-
1 2 3 4 5 6 7 8 9
(define function7 (lambda () '())) (define go (lambda () (display "running go...") (newline) (function7))) (go)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display "result for let...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display "result for let...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display "result for let...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display "result for let...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display "result for let...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display "result for let...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) (let ((x 5) (y (* x 2))) (display (+ x y)) (newline))
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 10)) \(let ((x 5) (y (* x 2))) (display (+ x y)) (newline))
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) (let ((x 20)) '()) '())) (define go (lambda () (display "running go...")
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () (display "running function6...") (newline) '())) (define go (lambda () (display "running go...") (newline)
...
-
1 2 3 4 5 6 7 8 9
(define function6 (lambda () '())) (define go (lambda () (display "running go...") (newline) (function6))) (go)
-
1 2 3 4 5 6 7 8 9
(define function5 (lambda () (display "running function5...") (newline) (let ((zoom (lambda (x) (* 5 x)))) (display (zoom 26))) '())) (define go (lambda ()
...
-
1 2 3 4 5 6 7 8 9
(define function5 (lambda () (display "running function5...") (newline) '())) (define go (lambda () (display "running go...")
...
-
1
(+,3,2)
-
1
(+ 3 2)
-
1 2 3 4 5 6 7 8 9
(define function5 (lambda () (display "running function5...") '())) (define go (lambda () (display "running go...") (newline) (function5)))
...
-
1 2 3 4 5 6 7 8 9
(define function5 (lambda () '())) (define go (lambda () (display "running go...") (newline) (function5))) (go)
...
-
1 2 3 4 5 6 7 8
(define function4 (lambda () (display "function4") (newline) (let ((y 20)) (let ((y 1) (x 1)) (display (+ x y)) (newline)))))
...
-
1 2 3 4 5 6 7 8 9
(define function4 (lambda () (display "function4") (newline) (let ((y 20)) (let ((y 1) (x 1)) (display (+ x y)) (newline) '())
...
-
1 2 3 4 5 6 7 8 9
(define function4 (lambda () (display "function4") (newline) (let ((y 20)) '() ))) (define go (lambda ()
...
-
1 2 3 4 5 6 7 8 9
(define (f n) (do ((d (do ((i (- n 1) (- i 1)) (d '() (cons i d))) ((< i 0) d)) (append (cddr d) (list (car d))))) ((null? (cdr d)) (car d)))) (display (f 1)) (display (f 2)) (display (f 3))
...
-
1 2 3 4 5 6 7 8
(define function4 (lambda () (display "function4") (newline) (let ((y 20)) (display y) (newline) )))
...
-
1 2 3 4 5 6 7 8
(define function4 (lambda () (display "function4") (newline) (let ((y 20)) (display y) (newline) )))
...
-
1 2 3 4 5 6 7 8 9
(define function4 (lambda () (display "function4") (newline) (let ((y 20)) '()) '())) (define go (lambda () (display "running go...")
...


