|
@@ -1,5 +1,5 @@
|
|
|
/*
|
|
|
-** $Id: lstrlib.c,v 1.215 2014/11/05 18:55:43 roberto Exp roberto $
|
|
|
+** $Id: lstrlib.c,v 1.216 2014/11/08 18:12:53 roberto Exp roberto $
|
|
|
** Standard library for string operations and pattern-matching
|
|
|
** See Copyright Notice in lua.h
|
|
|
*/
|
|
@@ -1088,16 +1088,14 @@ static KOption getoption (Header *h, const char **fmt, int *size) {
|
|
|
case 'z': return Kzstr;
|
|
|
case 'x': *size = 1; return Kpadding;
|
|
|
case 'X': return Kpaddalign;
|
|
|
- case ' ': return Knop;
|
|
|
- case '<': h->islittle = 1; return Knop;
|
|
|
- case '>': h->islittle = 0; return Knop;
|
|
|
- case '=': h->islittle = nativeendian.little; return Knop;
|
|
|
- case '!': h->maxalign = getnumlimit(h, fmt, MAXALIGN); return Knop;
|
|
|
- default: {
|
|
|
- luaL_error(h->L, "invalid format option '%c'", opt);
|
|
|
- return Knop;
|
|
|
- }
|
|
|
+ case ' ': break;
|
|
|
+ case '<': h->islittle = 1; break;
|
|
|
+ case '>': h->islittle = 0; break;
|
|
|
+ case '=': h->islittle = nativeendian.little; break;
|
|
|
+ case '!': h->maxalign = getnumlimit(h, fmt, MAXALIGN); break;
|
|
|
+ default: luaL_error(h->L, "invalid format option '%c'", opt);
|
|
|
}
|
|
|
+ return Knop;
|
|
|
}
|
|
|
|
|
|
|