From 1289a7a11fe55a4e37d923fc6b0af2c228e83175 Mon Sep 17 00:00:00 2001 From: matz Date: Thu, 23 Aug 2001 06:02:15 +0000 Subject: * eval.c (is_defined): should not dump core for "defined?(())". * eval.c (umethod_bind): recv can be an instance of descender of oklass if oklass is a Module. * hash.c (rb_hash_equal): check identiry equality first. * file.c (group_member): should check real gid only. * file.c (eaccess): do not cache euid, since effective euid may be changed via Process.euid=(). * file.c (eaccess): return -1 unless every specified access mode is permitted. * eval.c (rb_eval): while/until returns the value which is given to break. * parse.y (value_expr): using while/until/class/def as an expression is now gives a warning, not an error. * range.c (range_eqq): should compare strings based on magical increment (using String#upto), not dictionary order. * enum.c (enum_sort_by): new method for Schewartzian transformed stable sort. * variable.c (mod_av_set): detect constant overriding for built-in classes/modules. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1707 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- parse.y | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) (limited to 'parse.y') diff --git a/parse.y b/parse.y index 9ea4954368..17361cd5d9 100644 --- a/parse.y +++ b/parse.y @@ -1191,7 +1191,7 @@ primary : literal } | tLPAREN_ARG expr {lex_state = EXPR_ENDARG;} ')' { - rb_warning("%s (...) interpreted as command call", rb_id2name($1)); + rb_warning("%s (...) interpreted as grouped expression", rb_id2name($1)); $$ = $2; } | tLPAREN compstmt ')' @@ -4355,20 +4355,22 @@ value_expr(node) if (node == 0) return Qtrue; switch (nd_type(node)) { - case NODE_RETURN: - case NODE_BREAK: - case NODE_NEXT: - case NODE_REDO: - case NODE_RETRY: case NODE_WHILE: case NODE_UNTIL: case NODE_CLASS: case NODE_MODULE: case NODE_DEFN: case NODE_DEFS: + rb_warning("void value expression"); + return Qfalse; + + case NODE_RETURN: + case NODE_BREAK: + case NODE_NEXT: + case NODE_REDO: + case NODE_RETRY: yyerror("void value expression"); return Qfalse; - break; case NODE_BLOCK: while (node->nd_next) { -- cgit v1.2.3