That's actually what's needed rather than a string.
+ {
+ $$ = scm_string_to_symbol ($1);
+ }
+ {
+ $$ = scm_string_to_symbol ($1);
+ }
$$ = SCM_UNSPECIFIED;
}
| assignment_id '.' property_path '=' identifier_init {
$$ = SCM_UNSPECIFIED;
}
| assignment_id '.' property_path '=' identifier_init {
- SCM path = scm_cons (scm_string_to_symbol ($1), $3);
+ SCM path = scm_cons ($1, $3);
parser->lexer_->set_identifier (path, $5);
$$ = SCM_UNSPECIFIED;
}
| assignment_id ',' property_path '=' identifier_init {
parser->lexer_->set_identifier (path, $5);
$$ = SCM_UNSPECIFIED;
}
| assignment_id ',' property_path '=' identifier_init {
- SCM path = scm_cons (scm_string_to_symbol ($1), $3);
+ SCM path = scm_cons ($1, $3);
parser->lexer_->set_identifier (path, $5);
$$ = SCM_UNSPECIFIED;
}
parser->lexer_->set_identifier (path, $5);
$$ = SCM_UNSPECIFIED;
}