Skip to content

Commit

Permalink
* ext/json/ext/parser/parser.rl: add local variables for emacs.
Browse files Browse the repository at this point in the history 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@30790 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
  • Loading branch information
@nobu
nobu committed Jul 7, 2011
1 parent f662054 commit 43bfa8a
Show file tree
Hide file tree
Showing 2 changed files with 32 additions and 18 deletions.
23 changes: 15 additions & 8 deletions ext/json/ext/parser/parser.c
View file
Expand Up @@ -4,7 +4,7 @@

/* unicode */

static const char digit_values[256] = {
static const char digit_values[256] = {
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, -1,
Expand Down Expand Up @@ -40,7 +40,7 @@ static UTF32 unescape_unicode(const unsigned char *p)
return result;
}

static int convert_UTF32_to_UTF8(char *buf, UTF32 ch)
static int convert_UTF32_to_UTF8(char *buf, UTF32 ch)
{
int len = 1;
if (ch <= 0x7F) {
Expand Down Expand Up @@ -228,7 +228,7 @@ case 8:
#line 116 "parser.rl"
{
VALUE v = Qnil;
char *np = JSON_parse_value(json, p, pe, &v);
char *np = JSON_parse_value(json, p, pe, &v);
if (np == NULL) {
p--; {p++; cs = 9; goto _out;}
} else {
Expand Down Expand Up @@ -534,7 +534,7 @@ cs = 0;
goto st21;
tr5:
#line 233 "parser.rl"
{
{
char *np;
json->current_nesting++;
np = JSON_parse_array(json, p, pe, result);
Expand All @@ -544,7 +544,7 @@ cs = 0;
goto st21;
tr9:
#line 241 "parser.rl"
{
{
char *np;
json->current_nesting++;
np = JSON_parse_object(json, p, pe, result);
Expand Down Expand Up @@ -1097,7 +1097,7 @@ case 2:
#line 343 "parser.rl"
{
VALUE v = Qnil;
char *np = JSON_parse_value(json, p, pe, &v);
char *np = JSON_parse_value(json, p, pe, &v);
if (np == NULL) {
p--; {p++; cs = 3; goto _out;}
} else {
Expand Down Expand Up @@ -1320,7 +1320,7 @@ static VALUE json_string_unescape(VALUE result, char *string, char *stringEnd)
unescape = (char *) "\f";
break;
case 'u':
if (pe > stringEnd - 4) {
if (pe > stringEnd - 4) {
return Qnil;
} else {
char buf[4];
Expand Down Expand Up @@ -1551,7 +1551,7 @@ static const int JSON_en_main = 1;
#line 550 "parser.rl"


/*
/*
* Document-class: JSON::Ext::Parser
*
* This is the JSON parser implemented as a C extension. It can be configured
Expand Down Expand Up @@ -1977,3 +1977,10 @@ void Init_parser()
i_iconv = rb_intern("iconv");
#endif
}

/*
* Local variables:
* mode: c
* c-file-style: ruby
* End:
*/
27 changes: 17 additions & 10 deletions ext/json/ext/parser/parser.rl
View file
Expand Up @@ -2,7 +2,7 @@

/* unicode */

static const char digit_values[256] = {
static const char digit_values[256] = {
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, -1,
Expand Down Expand Up @@ -38,7 +38,7 @@ static UTF32 unescape_unicode(const unsigned char *p)
return result;
}

static int convert_UTF32_to_UTF8(char *buf, UTF32 ch)
static int convert_UTF32_to_UTF8(char *buf, UTF32 ch)
{
int len = 1;
if (ch <= 0x7F) {
Expand Down Expand Up @@ -97,7 +97,7 @@ static ID i_json_creatable_p, i_json_create, i_create_id, i_create_additions,
VNaN = 'NaN';
VInfinity = 'Infinity';
VMinusInfinity = '-Infinity';
begin_value = [nft"\-[{NI] | digit;
begin_value = [nft\"\-\[\{NI] | digit;
begin_object = '{';
end_object = '}';
begin_array = '[';
Expand All @@ -115,7 +115,7 @@ static ID i_json_creatable_p, i_json_create, i_create_id, i_create_additions,

action parse_value {
VALUE v = Qnil;
char *np = JSON_parse_value(json, fpc, pe, &v);
char *np = JSON_parse_value(json, fpc, pe, &v);
if (np == NULL) {
fhold; fbreak;
} else {
Expand Down Expand Up @@ -230,15 +230,15 @@ static char *JSON_parse_object(JSON_Parser *json, char *p, char *pe, VALUE *resu
fhold; fbreak;
}

action parse_array {
action parse_array {
char *np;
json->current_nesting++;
np = JSON_parse_array(json, fpc, pe, result);
json->current_nesting--;
if (np == NULL) { fhold; fbreak; } else fexec np;
}

action parse_object {
action parse_object {
char *np;
json->current_nesting++;
np = JSON_parse_object(json, fpc, pe, result);
Expand Down Expand Up @@ -342,7 +342,7 @@ static char *JSON_parse_float(JSON_Parser *json, char *p, char *pe, VALUE *resul

action parse_value {
VALUE v = Qnil;
char *np = JSON_parse_value(json, fpc, pe, &v);
char *np = JSON_parse_value(json, fpc, pe, &v);
if (np == NULL) {
fhold; fbreak;
} else {
Expand Down Expand Up @@ -419,7 +419,7 @@ static VALUE json_string_unescape(VALUE result, char *string, char *stringEnd)
unescape = (char *) "\f";
break;
case 'u':
if (pe > stringEnd - 4) {
if (pe > stringEnd - 4) {
return Qnil;
} else {
char buf[4];
Expand Down Expand Up @@ -475,7 +475,7 @@ static VALUE json_string_unescape(VALUE result, char *string, char *stringEnd)

action exit { fhold; fbreak; }

main := '"' ((^(["\\] | 0..0x1f) | '\\'["\\/bfnrt] | '\\u'[0-9a-fA-F]{4} | '\\'^(["\\/bfnrtu]|0..0x1f))* %parse_string) '"' @exit;
main := '"' ((^([\"\\] | 0..0x1f) | '\\'[\"\\/bfnrt] | '\\u'[0-9a-fA-F]{4} | '\\'^([\"\\/bfnrtu]|0..0x1f))* %parse_string) '"' @exit;
}%%

static int
Expand Down Expand Up @@ -549,7 +549,7 @@ static char *JSON_parse_string(JSON_Parser *json, char *p, char *pe, VALUE *resu
) ignore*;
}%%

/*
/*
* Document-class: JSON::Ext::Parser
*
* This is the JSON parser implemented as a C extension. It can be configured
Expand Down Expand Up @@ -834,3 +834,10 @@ void Init_parser()
i_iconv = rb_intern("iconv");
#endif
}

/*
* Local variables:
* mode: c
* c-file-style: ruby
* End:
*/

0 comments on commit 43bfa8a

Please sign in to comment.