dallasgroot/Gimp
dallasgroot/Gimp
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Reverting previous change. I figured it would break something. It breaks

Browse source 
2008-05-18  Kevin Cozens  <kcozens@cvs.gnome.org>

	* plug-ins/script-fu/tinyscheme/scheme.c: Reverting previous change.
	I figured it would break something. It breaks the 'while' macro by
	preventing use of a named let.

svn path=/trunk/; revision=25706
This commit is contained in:
Kevin Cozens 2008-05-18 21:20:12 +00:00 committed by Kevin Cozens
parent 57a9451c4c
commit bedb7e3163
2 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
ChangeLog
View file

@ -1,3 +1,9 @@
2008-05-18 Kevin Cozens <kcozens@cvs.gnome.org>
* plug-ins/script-fu/tinyscheme/scheme.c: Reverting previous change.
I figured it would break something. It breaks the 'while' macro by
preventing use of a named let.
2008-05-18 Michael Natterer <mitch@gimp.org>
* app/core/gimpcurve.c: implement (de)serializing of the points

2
plug-ins/script-fu/tinyscheme/scheme.c
View file

@ -2780,8 +2780,6 @@ static pointer opexe_0(scheme *sc, enum scheme_opcodes op) {
new_slot_in_env(sc, caar(x), car(y));
}
if (is_symbol(car(sc->code))) { /* named let */
if (!is_pair(cadr(sc->code)))
Error_1(sc, "Bad syntax of binding spec in let :", car(sc->code));
for (x = cadr(sc->code), sc->args = sc->NIL; x != sc->NIL; x = cdr(x)) {
sc->args = cons(sc, caar(x), sc->args);