pike.git/
src/
language.yacc
Branch:
Tag:
Non-build tags
All tags
No tags
2014-08-10
2014-08-10 20:41:12 by Martin Nilsson <nilsson@opera.com>
c2c932064ba183b17a76160970d2075154df9c0f (
24
lines) (+
12
/-
12
)
[
Show
|
Annotate
]
Branch:
8.0
Remove Pike 0.6 support.
778:
/* construct the function type */ push_finished_type(Pike_compiler->compiler_frame->current_type);
-
if ($5 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($5 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while(--$5>=0) push_type(T_ARRAY);
1253:
full_type: type4 | full_type '*' {
-
if (Pike_compiler->compiler_pass == 2
&& !TEST_COMPAT (0, 6
)
)
{
+
if (Pike_compiler->compiler_pass == 2) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } push_type(T_ARRAY);
1264:
type: type '*' {
-
if (Pike_compiler->compiler_pass == 2
&& !TEST_COMPAT (0, 6
)
)
{
+
if (Pike_compiler->compiler_pass == 2) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } push_type(T_ARRAY);
1274:
type7: type7 '*' {
-
if (Pike_compiler->compiler_pass == 2
&& !TEST_COMPAT (0, 6
)
)
{
+
if (Pike_compiler->compiler_pass == 2) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } push_type(T_ARRAY);
1703:
struct pike_type *type; node *n; push_finished_type(Pike_compiler->compiler_frame->current_type);
-
if ($1 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($1 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while($1--) push_type(T_ARRAY);
1724:
struct pike_type *type; node *n; push_finished_type(Pike_compiler->compiler_frame->current_type);
-
if ($1 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($1 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while($1--) push_type(T_ARRAY);
1792:
{ int id; push_finished_type($<n>0->u.sval.u.type);
-
if ($1 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($1 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while($1--) push_type(T_ARRAY);
1809:
{ int id; push_finished_type($<n>0->u.sval.u.type);
-
if ($1 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($1 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while($1--) push_type(T_ARRAY);
2417:
debug_malloc_touch(Pike_compiler->compiler_frame->current_return_type); push_finished_type($<n>0->u.sval.u.type);
-
if ($1 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($1 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while($1--) push_type(T_ARRAY);
2566:
} push_finished_type(Pike_compiler->compiler_frame->current_type);
-
if ($3 && (Pike_compiler->compiler_pass == 2)
&& !TEST_COMPAT (0, 6
)
)
{
+
if ($3 && (Pike_compiler->compiler_pass == 2)) {
yywarning("The *-syntax in types is obsolete. Use array instead."); } while($3--) push_type(T_ARRAY);
3261:
return: TOK_RETURN expected_semicolon {
-
if(!
TEST_COMPAT(0,6) &&
-
!
match_types(Pike_compiler->compiler_frame->current_return_type,
+
if(!match_types(Pike_compiler->compiler_frame->current_return_type,
void_type_string)) { yytype_error("Must return a value for a non-void function.",