Ideone.com | Online Scheme Interpreter & Debugging Tool

Computer geeks!

Recent public codes are listed below. You can filter them by the following programming languages:

codes: 20382 page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

34 days 19 hours ago view (lines: 9, size: 127, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
9
(define (example)
  (let ((x 0))
    (lambda ()
      (set! x (+ x 1))
      x)))
 
(define f (example))
(display f)
(display f)

34 days 19 hours ago view (lines: 9, size: 111, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
9
(define (example)
  (let ((x 0))
    (lambda ()
      (set! x (+ x 1))
      x)))
 
(define f (example))
(f)
(f)

34 days 19 hours ago view (lines: 20, size: 239, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 19 hours ago view (lines: 20, size: 243, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 19 hours ago view (lines: 19, size: 240, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 19 hours ago view (lines: 19, size: 234, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 19 hours ago view (lines: 18, size: 221, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 19 hours ago view (lines: 18, size: 218, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 19 hours ago view (lines: 14, size: 185, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

34 days 21 hours ago view (lines: 25, size: 940, inputs: 1) Scheme (guile) Not running

1
2
3
4
5
6
7
8
9
                       #
              ####   #####   ####
        ##     #################     ##
         #############   #############
          #######             #######
     ######                         ######
      ###          Spieglein          ###
  ######                               ######
 ######            Spieglein            ######
 ...

34 days 23 hours ago view (lines: 7, size: 90, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
(define (square)
  (lambda (x)
    (* x x)))
 
(define my-sq (square))
 
(print (my-sq 3))

34 days 23 hours ago view (lines: 7, size: 82, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
(define (square)
  (lambda (x)
    (* x x)))
 
(define my-sq (square))
 
(my-sq 3)

34 days 23 hours ago view (lines: 7, size: 80, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
(define (square)
  (lambda (x)
    (* x x)))
 
(define my-sq square)
 
(my-sq 3)

34 days 23 hours ago view (lines: 7, size: 79, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
(define (square)
  (lambda (x)
    (* x x)))
 
(define my-sqr square)
 
(mysqr 3)

34 days 23 hours ago view (lines: 5, size: 63, inputs: 1) Scheme (guile) Success

1
2
3
4
5
; 1.1.2 Naming the Environment
 
(define size 2)
 
(display size)

35 days 0 hours ago view (lines: 1, size: 17, inputs: 1) Scheme (guile) Success

1
(display (+ 5 6))

35 days 0 hours ago view (lines: 1, size: 7, inputs: 1) Scheme (guile) Success

1
(+ 5 6)

35 days 9 hours ago view (lines: 10, size: 148, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

35 days 14 hours ago view (lines: 10, size: 148, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
(define (do_it n)
  (define (print_it n)
    (display n)
    (newline))
  (cond ((not(= n 42))
        (print_it n)
        (do_it (read)))
    ))

35 days 16 hours ago view (lines: 30, size: 371, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
; 1.1.1 Expressions
 
; Evaluates to 486
486
 
; Let's display it
(display 486)
(newline)
 ...

35 days 16 hours ago view (lines: 14, size: 203, inputs: 1) Scheme (guile) Success

1
2
3
4
5
6
7
8
; 1.1.1 Expressions
 
; Evaluates to 486
486
 
; Let's display it
(display 486)
(newline)
 ...

35 days 16 hours ago view (lines: 14, size: 199, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
; 1.1.1 Expressions
 
; Evaluates to 486
486
 
; Let's display it
(display 486)
(newline)
 ...

35 days 16 hours ago view (lines: 14, size: 193, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
; 1.1.1 Expressions
 
; Evaluates to 486
486
 
; Let's display it
(display 486)
(newline)
 ...

35 days 16 hours ago view (lines: 14, size: 193, inputs: 1) Scheme (guile) Runtime error

1
2
3
4
5
6
7
8
; 1.1.1 Expressions
 
; Evaluates to 486
486
 
; Let's display it
(display 486)
(newline)
 ...

35 days 20 hours ago view (lines: 3, size: 51, inputs: 1) Scheme (guile) Success

1
2
3
(define (a x y) (+ x y))
(define (a x y) 4)
(a 3 4)

35 days 20 hours ago view (lines: 3, size: 49, inputs: 1) Scheme (guile) Runtime error

1
2
3
(define (a x y) (+ x y))
(define (a x y) 4)
(a 3)

35 days 20 hours ago view (lines: 3, size: 47, inputs: 1) Scheme (guile) Success

1
2
3
(define (a x y) (+ x y))
(define (a x) 4)
(a 3)

35 days 20 hours ago view (lines: 3, size: 29, inputs: 1) Scheme (guile) Runtime error

1
2
3
(define a 5)
(define a 4)
(a)

35 days 20 hours ago view (lines: 3, size: 26, inputs: 1) Scheme (guile) Success

1
2
(define a 5)
(define a 4)

35 days 20 hours ago view (lines: 3, size: 34, inputs: 1) Scheme (guile) Runtime error

1
2
3
(define a 5)
(define a 4)
(eval a)

page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

1 2 3 4 5 6 7 8 9	# #### ##### #### ## ################# ## ############# ############# ####### ####### ###### ###### ### Spieglein ### ###### ###### ###### Spieglein ######
...

1 2 3 4 5 6 7 8	; 1.1.1 Expressions ; Evaluates to 486 486 ; Let's display it (display 486) (newline)
...

UsernamePassword

Username
Password