Searched refs:BEGIN (Results 1 – 25 of 837) sorted by relevance
12345678910>>...34
| /mirbsd/src/gnu/usr.bin/perl/ext/attrs/t/ |
| D | attrs.t | 5 BEGIN {
20 BEGIN {$ntests=0}
29 BEGIN {++$ntests}
34 BEGIN {++$ntests}
39 BEGIN {++$ntests}
44 BEGIN {++$ntests}
50 BEGIN {++$ntests}
56 BEGIN {++$ntests}
62 BEGIN {++$ntests}
67 BEGIN {++$ntests}
[all …]
|
| /mirbsd/src/usr.bin/lex/ |
| D | scan.l | 114 ^{WS} indented_code = true; BEGIN(CODEBLOCK);
123 BEGIN(CODEBLOCK);
133 BEGIN(SECT2PROLOG);
140 ^"%option" BEGIN(OPTION); return OPTION_OP;
150 BEGIN(PICKUPDEF);
297 BEGIN(RECOVER);
301 <RECOVER>.*{NL} ++linenum; BEGIN(INITIAL);
316 BEGIN(SECT2);
339 BEGIN(PERCENT_BRACE_ACTION);
342 ^{OPTWS}"<" BEGIN(SC); return '<';
[all …]
|
| D | initscan.c | 90 #define BEGIN yy_start = 1 + 2 * macro
1609 indented_code = true; BEGIN(CODEBLOCK);
1638 BEGIN(CODEBLOCK);
1654 BEGIN(SECT2PROLOG);
1671 BEGIN(OPTION); return OPTION_OP;
1694 BEGIN(PICKUPDEF);
1765 ++linenum; BEGIN(INITIAL);
1779 BEGIN(INITIAL);
1813 BEGIN(INITIAL);
1822 ++linenum; BEGIN(INITIAL);
[all …]
|
| /mirbsd/src/gnu/usr.bin/perl/lib/Text/Balanced/t/ |
| D | exttag.t | 1 BEGIN {
16 BEGIN { $| = 1; print "1..53\n"; }
61 # USING: gen_extract_tagged("BEGIN([A-Z]+)",'END$1',"(?s).*?(?=BEGIN)")->($str);
65 # USING: extract_tagged($str,"BEGIN([A-Z]+)",'END$1',"(?s).*?(?=BEGIN)");
69 # USING: extract_tagged($str,"BEGIN([A-Z]+)",'END$1',"(?s).*?(?=BEGIN)");
76 # USING: extract_tagged($str,"BEGIN","END","(?s).*?(?=BEGIN)");
77 ignore\n this and then BEGIN at the END;
85 # USING: extract_tagged($str,"BEGIN","END");
86 BEGIN at the BEGIN keyword and END at the END;
87 BEGIN at the beginning and end at the END;
[all …]
|
| D | gentag.t | 1 BEGIN {
16 BEGIN { $| = 1; print "1..37\n"; }
74 # USING: gen_extract_tagged("BEGIN","END");
75 BEGIN at the BEGIN keyword and END at the END;
76 BEGIN at the beginning and end at the END;
88 BEGIN at the beginning and end at the end;
89 BEGIN at the BEGIN keyword and END at the end;
92 # USING: gen_extract_tagged("BEGIN","END",undef,{reject=>["BEGIN","END"]});
94 BEGIN at the BEGIN keyword and END at the end;
|
| /mirbsd/src/gnu/usr.bin/perl/t/comp/ |
| D | hints.t | 5 BEGIN {
11 BEGIN { print "1..15\n"; }
12 BEGIN {
20 BEGIN { $^H |= 0x00020000; $^H{foo} = "a"; }
21 BEGIN {
28 BEGIN { $^H |= 0x00020000; $^H{foo} = "b"; }
29 BEGIN {
34 BEGIN {
58 BEGIN {
|
| /mirbsd/src/usr.bin/sudo/ |
| D | parse.lex | 100 <GOTDEFS>[[:blank:]]+ BEGIN STARTDEFS;
103 BEGIN INDEFS;
111 BEGIN STARTDEFS;
160 BEGIN INITIAL;
173 BEGIN GOTDEFS;
204 BEGIN GOTRUNAS;
258 BEGIN GOTRUNAS;
282 BEGIN INITIAL;
286 BEGIN GOTCMND;
298 BEGIN GOTCMND;
[all …]
|
| /mirbsd/src/sys/dev/microcode/aic7xxx/ |
| D | aicasm_scan.l | 90 "/*" { BEGIN COMMENT; /* Enter comment eating state */ }
96 <COMMENT>"*"+"/" { BEGIN INITIAL; }
100 BEGIN CEXPR;
108 BEGIN INITIAL;
139 BEGIN STRING;
248 BEGIN INCLUDE;
253 <INCLUDE>[>] { BEGIN INITIAL; return yytext[0]; }
256 BEGIN INITIAL;
273 BEGIN MACRODEF;
286 BEGIN MACROBODY;
[all …]
|
| /mirbsd/src/gnu/usr.bin/perl/t/op/ |
| D | override.t | 3 BEGIN {
16 BEGIN { package Foo; *main::getlogin = sub { "kilroy"; } }
21 BEGIN { *CORE::GLOBAL::time = sub () { $t; } }
29 BEGIN { *CORE::GLOBAL::require = sub { $r = shift; 1; } }
87 BEGIN { *OverridenWarn::warn = sub { CORE::warn "@_ overriden"; }; }
93 BEGIN { *OverridenPop::pop = sub { ::is( $_[0][0], "ok" ) }; }
|
| D | caller.t | 4 BEGIN {
76 BEGIN { is( ${^WARNING_BITS}, "\0" x 12, 'warning bits' ) }
79 BEGIN { is( ${^WARNING_BITS}, "UUUUUUUUUUU\25", 'warning bits' ) }
80 BEGIN { testwarn("UUUUUUUUUUU\25"); }
85 BEGIN { is( ${^WARNING_BITS}, "UUUUUUUUUUUU", 'warning bits' ) }
|
| /mirbsd/src/gnu/usr.bin/perl/t/lib/warnings/ |
| D | 3both | 119 BEGIN { $^W = 0 }
131 BEGIN { $^W = 1 }
140 BEGIN { $^W = 1 }
148 BEGIN { $^W = 1 }
157 BEGIN { $^W = 1 }
167 BEGIN { $^W = 1 }
175 BEGIN { $^W = 1 }
188 BEGIN { $^W = 0 }
201 BEGIN { $^W = 1 }
214 BEGIN { $^W = 1 }
[all …]
|
| /mirbsd/src/etc/ |
| D | ssl.certs.shar | 16 X-----BEGIN CERTIFICATE-----
44 X-----BEGIN CERTIFICATE-----
72 X-----BEGIN CERTIFICATE-----
100 X-----BEGIN CERTIFICATE-----
131 X-----BEGIN CERTIFICATE-----
156 X-----BEGIN CERTIFICATE-----
194 X-----BEGIN CERTIFICATE-----
221 X-----BEGIN CERTIFICATE-----
246 X-----BEGIN CERTIFICATE-----
278 X-----BEGIN CERTIFICATE-----
[all …]
|
| /mirbsd/src/usr.bin/bc/ |
| D | scan.l | 55 "/*" BEGIN(comment);
57 "*/" BEGIN(INITIAL);
64 \" BEGIN(string); init_strbuf();
71 \" BEGIN(INITIAL); yylval.str = strbuf; return STRING;
76 BEGIN(number);
82 BEGIN(number);
91 BEGIN(INITIAL);
102 BEGIN(INITIAL);
|
| /mirbsd/src/usr.sbin/httpd/src/modules/ssl/ |
| D | ssl_expr_scan.l | 114 BEGIN(str);
117 BEGIN(INITIAL);
160 BEGIN(regex);
165 BEGIN(regex_flags);
173 BEGIN(INITIAL);
179 BEGIN(INITIAL);
184 BEGIN(INITIAL);
|
| /mirbsd/src/gnu/usr.bin/perl/lib/ |
| D | lib.t | 3 BEGIN {
20 BEGIN {
51 BEGIN { use_ok('Yup') }
53 BEGIN {
87 BEGIN {
|
| /mirbsd/src/gnu/usr.bin/perl/lib/User/ |
| D | grent.t | 3 BEGIN {
10 BEGIN {
20 BEGIN {
25 BEGIN {
|
| /mirbsd/src/gnu/usr.bin/perl/lib/DBM_Filter/t/ |
| D | utf8.t | 6 BEGIN
21 BEGIN { use_ok('DBM_Filter') };
22 BEGIN { use_ok('SDBM_File') };
23 BEGIN { use_ok('Fcntl') };
24 BEGIN { use_ok('charnames', qw{greek})};
|
| D | compress.t | 6 BEGIN
19 BEGIN { use_ok('DBM_Filter') };
20 BEGIN { use_ok('SDBM_File') };
21 BEGIN { use_ok('Fcntl') };
22 BEGIN { use_ok('Compress::Zlib') };
|
| D | encode.t | 7 BEGIN
23 BEGIN { use_ok('DBM_Filter') };
24 BEGIN { use_ok('SDBM_File') };
25 BEGIN { use_ok('Fcntl') };
26 BEGIN { use_ok('charnames', qw{greek})};
|
| /mirbsd/src/gnu/usr.bin/perl/wince/ |
| D | perl.rc | 16 BEGIN
18 BEGIN
20 BEGIN
33 BEGIN
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Unicode/Normalize/t/ |
| D | illegal.t | 2 BEGIN {
10 BEGIN {
17 BEGIN {
31 BEGIN {
42 BEGIN { plan tests => 112 };
|
| /mirbsd/src/gnu/usr.bin/perl/ext/B/t/ |
| D | optree_specials.t | 10 BEGIN {
41 my $src = q[our ($beg, $chk, $init, $end) = qq{'foo'}; BEGIN { $beg++ } CHECK { $chk++ } INIT { $in…
170 bcopts => [qw/ BEGIN END INIT CHECK -exec /],
247 bcopts => [qw/ BEGIN END INIT CHECK -exec /],
|
| D | deparse.t | 3 BEGIN {
37 BEGIN { ($hint_bits, $warning_bits) = ($^H, ${^WARNING_BITS}); }
115 BEGIN { $^I = ".bak"; }
116 BEGIN { $^W = 1; }
117 BEGIN { $/ = "\n"; $\ = "\n"; }
124 $b =~ s/(LINE:)/sub BEGIN {
|
| /mirbsd/src/lib/libkeynote/ |
| D | keynote-ver.l | 48 BEGIN(SECONDPART);
60 BEGIN(MIDDLEPART);
72 BEGIN(FIRSTPART);
231 BEGIN(FIRSTPART);
270 BEGIN(KEYSTATE);
|
| /mirbsd/src/gnu/usr.bin/perl/t/run/ |
| D | fresh_perl.t | 11 BEGIN {
185 BEGIN { die "phooey\n" }
188 BEGIN failed--compilation aborted at - line 1.
190 BEGIN { 1/$zero }
193 BEGIN failed--compilation aborted at - line 1.
195 BEGIN { undef = 0 }
198 BEGIN failed--compilation aborted at - line 1.
434 BEGIN {
445 BEGIN failed--compilation aborted at - line 8.
572 BEGIN {
|
12345678910>>...34