Hi,
Both this
(let ((a 1) )
(define (inc)
(set! a (+ 1 a ) ) )
(define (runTwice op )
(op)
(op) )
(eval '(runTwice inc ) )
)
and this
(let* ((a 1) )
(define (inc)
(set! a (+ 1 a ) ) )
(define (runTwice op )
(op)
(op) )
(eval
Hi,
Is there a function that gives the content of a procedure (it's definition)?
Daniel
___
Chicken-users mailing list
Chicken-users@nongnu.org
https://lists.nongnu.org/mailman/listinfo/chicken-users
add binds a to 1 at the moment of definition.
#;48 (define a 1)
#;49 (define (add x) (+ x a) )
#;50 (add 10)
11
#;51 (let ((a 100) ) (add 10) )
11
Is there a way to give a different value of a to add, so that, something like
this happens:
(let ((a 100) ) (add 10) )
110
Daniel
I pasted this code:
(define-macro (ez-debug var)
(let ((name (symbol-string var)))
`(print ,name : ,var)))
from
http://wiki.call-cc.org/chicken-for-ruby-programmers#macros
and got
Error: unbound variable: define-macro
Daniel
___
Hi,
Here
http://wiki.call-cc.org/elevator-pitch
it says this:
An excellent maintenance environment; bugs can be corrected live, without
restarting a single process.
where can I find more information about that?
I think that page should have links to the pages where those things are
the file
Vim\vim73\ftplugin\scheme.vim
has this:
==
if exists(b:is_chicken) || exists(is_chicken)
improve indenting
setl iskeyword+=#,%,^
setl lispwords+=let-optionals,let-optionals*,declare
setl lispwords+=let-values,let*-values,letrec-values
setl
This is my .csirc
(use readline irregex)
(current-input-port (make-gnu-readline-port))
(gnu-readline-parse-and-bind set editing-mode vi)
(gnu-history-install-file-manager
(string-append (or (get-environment-variable HOME) .) /.chicken_history)
)
csi
CHICKEN
(c) 2008-2013, The Chicken
Hi,
I'm new to Scheme
when I type
(define rec (lambda (n) (if (= n 0 ) oops! (/ 1 n ) ) ) )
The procedure seems to be accepted
But when I do:
(rec 1)
I get:
Error: (cadr) bad argument type: ()
Call history:
syntax (rec 1)
syntax (##core#letrec
