diff options
| author | Larry Wall <larry@netlabs.com> | 1993-12-10 00:00:00 +0000 |
|---|---|---|
| committer | Larry Wall <larry@netlabs.com> | 1993-12-10 00:00:00 +0000 |
| commit | ed6116ce9b9d13712ea252ee248b0400653db7f9 (patch) | |
| tree | 348e8de37401fa4381f6bfe0989abef2e3b409e0 /perly.c | |
| parent | 9bbf408117c16189b372e6657c9e5a15d01ea504 (diff) | |
| download | perl-ed6116ce9b9d13712ea252ee248b0400653db7f9.tar.gz | |
perl 5.0 alpha 5
[editor's note: the sparc executables have not been included,
and emacs backup files and other cruft such as patch backup files have
been removed. This was reconstructed from a tarball found on the
September 1994 InfoMagic CD]
Diffstat (limited to 'perly.c')
| -rw-r--r-- | perly.c | 33 |
1 files changed, 19 insertions, 14 deletions
@@ -1699,7 +1699,7 @@ yyloop: yys = 0; if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; if (!yys) yys = "illegal-symbol"; - printf("yydebug: state %d, reading %d (%s)\n", yystate, + fprintf(stderr, "yydebug: state %d, reading %d (%s)\n", yystate, yychar, yys); } #endif @@ -1709,7 +1709,7 @@ yyloop: { #if YYDEBUG if (yydebug) - printf("yydebug: state %d, shifting to state %d\n", + fprintf(stderr, "yydebug: state %d, shifting to state %d\n", yystate, yytable[yyn]); #endif if (yyssp >= yyss + yystacksize - 1) @@ -1762,8 +1762,9 @@ yyinrecovery: { #if YYDEBUG if (yydebug) - printf("yydebug: state %d, error recovery shifting\ - to state %d\n", *yyssp, yytable[yyn]); + fprintf(stderr, + "yydebug: state %d, error recovery shifting to state %d\n", + *yyssp, yytable[yyn]); #endif if (yyssp >= yyss + yystacksize - 1) { @@ -1791,8 +1792,9 @@ yyinrecovery: { #if YYDEBUG if (yydebug) - printf("yydebug: error recovery discarding state %d\n", - *yyssp); + fprintf(stderr, + "yydebug: error recovery discarding state %d\n", + *yyssp); #endif if (yyssp <= yyss) goto yyabort; --yyssp; @@ -1809,8 +1811,9 @@ yyinrecovery: yys = 0; if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; if (!yys) yys = "illegal-symbol"; - printf("yydebug: state %d, error recovery discards token %d (%s)\n", - yystate, yychar, yys); + fprintf(stderr, + "yydebug: state %d, error recovery discards token %d (%s)\n", + yystate, yychar, yys); } #endif yychar = (-1); @@ -1819,7 +1822,7 @@ yyinrecovery: yyreduce: #if YYDEBUG if (yydebug) - printf("yydebug: state %d, reducing by rule %d (%s)\n", + fprintf(stderr, "yydebug: state %d, reducing by rule %d (%s)\n", yystate, yyn, yyrule[yyn]); #endif yym = yylen[yyn]; @@ -2571,8 +2574,9 @@ break; { #if YYDEBUG if (yydebug) - printf("yydebug: after reduction, shifting from state 0 to\ - state %d\n", YYFINAL); + fprintf(stderr, + "yydebug: after reduction, shifting from state 0 to state %d\n", + YYFINAL); #endif yystate = YYFINAL; *++yyssp = YYFINAL; @@ -2586,7 +2590,7 @@ break; yys = 0; if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; if (!yys) yys = "illegal-symbol"; - printf("yydebug: state %d, reading %d (%s)\n", + fprintf(stderr, "yydebug: state %d, reading %d (%s)\n", YYFINAL, yychar, yys); } #endif @@ -2601,8 +2605,9 @@ break; yystate = yydgoto[yym]; #if YYDEBUG if (yydebug) - printf("yydebug: after reduction, shifting from state %d \ -to state %d\n", *yyssp, yystate); + fprintf(stderr, + "yydebug: after reduction, shifting from state %d to state %d\n", + *yyssp, yystate); #endif if (yyssp >= yyss + yystacksize - 1) { |