@@ -19,6 +19,7 @@ %{ std::string string_buf, here_doc; bool doing_symbol = false; + bool hyphen_here = false; typedef struct { const char *identifier; @@ -285,9 +286,15 @@ end { \|\| { return LOGICAL_OR; } \*\* { return EXP; } -\<\<[a-zA-Z_0-9]+$ { yy_push_state(here_document); here_doc = yytext + 2; string_buf = ""; } +\<\<[a-zA-Z_0-9]+$ { yy_push_state(here_document); here_doc = yytext + 2; string_buf = ""; hyphen_here = false; } +\<\<-[a-zA-Z_0-9]+$ { yy_push_state(here_document); here_doc = yytext + 3; string_buf = ""; hyphen_here = true; } <here_document>^.+$ { - if (yytext == here_doc) { + const char *yytext_check = yytext; + if (hyphen_here) + while (*yytext_check == ' ' || *yytext_check == '\t') + ++yytext_check; + + if (yytext_check == here_doc) { yy_pop_state(); yylval.string_literal = new StringLiteralExpr(string_buf); return STRING_LITERAL; parser/ruby.l 3b12e8c93157879c51607585fe8d18ffe2622e82 Arlen Cuss celtic@sairyx.org http://github.com/celtic/rubyex/commit/c98a260b243fe45c118bad89014e5fb1e21731db c98a260b243fe45c118bad89014e5fb1e21731db 2008-12-26T17:17:48-08:00 2008-12-26T17:17:48-08:00 adding <<-here style her edocuments e248ca58e63a3c1743dc9a96ad4d234cb75166ca Arlen Cuss celtic@sairyx.org