dnrops
/
gimp
mirror of https://github.com/GNOME/gimp.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

scheme: add missing breaks

This commit is contained in:
Mikael Magnusson 2014-10-29 21:09:13 +01:00
parent d96096515e
commit 68a4c4f85c
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
plug-ins/script-fu/tinyscheme/scheme.c
View File

@ -2179,12 +2179,16 @@ static void atom2str(scheme *sc, pointer l, int f, char **pp, int *plen) {
switch(c) { switch(c) {
case ' ': case ' ':
p = "#\\space"; p = "#\\space";
break;
case '\n': case '\n':
p = "#\\newline"; p = "#\\newline";
break;
case '\r': case '\r':
p = "#\\return"; p = "#\\return";
break;
case '\t': case '\t':
p = "#\\tab"; p = "#\\tab";
break;
default: default:
#if USE_ASCII_NAMES #if USE_ASCII_NAMES
if(c==127) { if(c==127) {
@ -2200,6 +2204,7 @@ static void atom2str(scheme *sc, pointer l, int f, char **pp, int *plen) {
} }
#endif #endif
snprintf(p,STRBUFFSIZE,"#\\%c",c); break; snprintf(p,STRBUFFSIZE,"#\\%c",c); break;
break;
} }
} }
} else if (is_symbol(l)) { } else if (is_symbol(l)) {