🚀 go-pugleaf

Hola Jos� Luis

El 19-04-2007
Jos� Luis P�rez Diez va escriure en 
es.comp.os.linux.programacion:
 
> In article <slrnf2d833.g1j.pere@hola.fou.net>, Pere Pujal i Carabantes 
> wrote:
> > La pregunta es si existe algo en scm equivalente a
> > 
> > for item in `cat lista`
> > do
> > órdenes varias
> > done
> > 
> > o bién
> > 
> > for i in a b c d
> > do
> > órdenes varias
> > done

> Supongo que scm es scheme (mas que nada por el grupo en que estamos)
>  para hacer eso se usa map 

S�, pensaba que el int�rprete ser�a /usr/bin/scm, de aqu� el t�tulo,
pero resulta que es tinyscheme, el que viene en el script-fu de gimp


> que puede estar definida como:

>  (define (map f lst)
>    (cond ((null? lst) lst)
>          (else (cons (f (car lst))
>                      (map f (cdr lst))))))

Copiado letra por letra, pero �hay necesidad de redefinirlo?

Es que acabo de probar sin el define y no veo la diferencia.



> y se llama tal que asi por ejemplo:

> (map (lambda (x) (* x x)) '(1 2 3 4))
>  ;;  => (1 4 9 16)

�ste ya me ha quedado diferente, tengo que pasar pares de coordenadas
para lo que me interesa:

(map (lambda (z)  (define x (car z))
	(define y (car(cdr z)))
	(set! target-layer (car (gimp-layer-copy target-layer TRUE)))
	(gimp-image-add-layer img target-layer -1)
	(gimp-drawable-offset target-layer 0 1 x y))
'((4 0) (-8 0) (4 4) (0 -8) (2 7)(-4 -6)(0 6)(4 -6)(-5 5)(6 -4)....))


Salut
Pere
-- 
Mentjant spam a spc@fornol.no-ip.org
Comiendo spam en cannsp@fornol.no-ip.org
Je mange spam a spmc@fornol.no-ip.org
Eating spam at cspm@fornol.no-ip.org