%type <node> compound_stmt dotname embed expr
%type <node> expr_or_type
%type <node> fndcl fnliteral
-%type <node> for_body for_header for_stmt if_header if_stmt
+%type <node> for_body for_header for_stmt if_header if_stmt non_dcl_stmt
%type <node> interfacedcl keyval labelname name
%type <node> name_or_type non_expr_type
%type <node> new_name dcl_name oexpr typedclname
{
$$ = list1($1);
}
+| non_dcl_stmt
+ {
+ yyerror("non-declaration statement outside function body");
+ $$ = nil;
+ }
| error
{
$$ = nil;
$$->nname->ntype = n;
funchdr($$);
}
-| '(' oarg_type_list_ocomma ')' new_name '(' oarg_type_list_ocomma ')' fnres
+| '(' oarg_type_list_ocomma ')' sym '(' oarg_type_list_ocomma ')' fnres
{
Node *rcvr, *t;
-
+ Node *name;
+
+ name = newname($4);
$2 = checkarglist($2, 0);
$6 = checkarglist($6, 1);
$$ = N;
}
$$ = nod(ODCLFUNC, N, N);
- $$->nname = methodname1($4, rcvr->right);
+ $$->nname = methodname1(name, rcvr->right);
t = nod(OTFUNC, rcvr, N);
t->list = $6;
t->rlist = $8;
$$->nname->ntype = t;
- $$->shortname = $4;
+ $$->shortname = name;
funchdr($$);
}
{
$$ = N;
}
-| simple_stmt
| compound_stmt
| common_dcl
{
$$ = liststmt($1);
}
+| non_dcl_stmt
+| error
+ {
+ $$ = N;
+ }
+
+non_dcl_stmt:
+ simple_stmt
| for_stmt
| switch_stmt
| select_stmt
$$ = $1;
$$->nelse = list1($3);
}
-| error
- {
- $$ = N;
- }
| labelname ':' stmt
{
NodeList *l;
--- /dev/null
+// errchk $G -e $D/$F.go
+
+// Copyright 2010 The Go Authors. All rights reserved.
+// Use of this source code is governed by a BSD-style
+// license that can be found in the LICENSE file.
+
+package main
+
+fmt.Printf("hello") // ERROR "non-declaration statement outside function body"
+
+func main() {
+}
+
+x++ // ERROR "non-declaration statement outside function body"
+
+func init() {
+}
+
+x,y := 1, 2 // ERROR "non-declaration statement outside function body"
+