diff options
| author | Brian Fraser <fraserbn@gmail.com> | 2013-09-05 21:59:19 -0300 |
|---|---|---|
| committer | Brian Fraser <fraserbn@gmail.com> | 2013-09-21 08:47:40 -0300 |
| commit | 1bf3cddf9666db4bbefdee1aa6f343ff8fb336e1 (patch) | |
| tree | b9e3d49d6c2f39ffc04c22f051331de8bb14d17d /toke.c | |
| parent | de54a1f165c533182b1d21240f94f10a5db97f2f (diff) | |
| download | perl-1bf3cddf9666db4bbefdee1aa6f343ff8fb336e1.tar.gz | |
Removed the ifdefs for __SC__ in toke.c
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 12 |
1 files changed, 0 insertions, 12 deletions
@@ -4737,9 +4737,6 @@ S_check_scalar_slice(pTHX_ char *s) */ -#ifdef __SC__ -#pragma segment Perl_yylex -#endif int Perl_yylex(pTHX) { @@ -8951,9 +8948,6 @@ Perl_yylex(pTHX) } }} } -#ifdef __SC__ -#pragma segment Main -#endif /* S_pending_ident @@ -11464,9 +11458,6 @@ Perl_start_subparse(pTHX_ I32 is_format, U32 flags) return oldsavestack_ix; } -#ifdef __SC__ -#pragma segment Perl_yylex -#endif static int S_yywarn(pTHX_ const char *const s, U32 flags) { @@ -11598,9 +11589,6 @@ Perl_yyerror_pvn(pTHX_ const char *const s, STRLEN len, U32 flags) PL_in_my_stash = NULL; return 0; } -#ifdef __SC__ -#pragma segment Main -#endif STATIC char* S_swallow_bom(pTHX_ U8 *s) |