Home
last modified time | relevance | path

Searched refs:warn (Results 1 – 25 of 1148) sorted by relevance

12345678910>>...46

/openbsd-src/gnu/usr.bin/perl/t/op/
H A Ddie_keeperr.t19 my $warn = "";
20 local $SIG{__WARN__} = sub { $warn .= $_[0] };
26 $warn =~ s/ at [^\n]*\n\z//;
27 is $warn, $inx ? "\t(in cleanup) $inx" : "";
33 my $warn = "";
34 local $SIG{__WARN__} = sub { $warn .= $_[0] };
36 is $warn, "";
41 my $warn = "";
42 local $SIG{__WARN__} = sub { $warn .= $_[0] };
44 is $warn, "\t(in cleanup) aa\n";
[all …]
H A Dwarn.t19 warn "foo\n";
24 warn "foo", "bar\n";
29 warn "foo";
34 warn $wa;
39 warn "";
45 warn;
51 warn "foo\n";
56 warn "foo", "bar\n";
61 warn "foo";
66 warn $wa;
[all …]
H A Dkvhslice.t44 my @warn;
45 local $SIG{__WARN__} = sub {push @warn, "@_"};
50 like ($warn[0],
55 is (scalar @warn, 2);
56 like ($warn[1],
142 my @warn;
143 local $SIG{__WARN__} = sub {push @warn, "@_"};
147 @warn = ();
149 is (scalar @warn, 1, 'warning in scalar context');
150 like $warn[0],
[all …]
/openbsd-src/gnu/usr.bin/perl/
H A Dcflags.SH50 warn=''
58 *) warn="$warn -Wall" ;;
203 flags="-DPERL_NO_INLINE_FUNCTIONS $ccflags $warn $stdflags $opt"
227 case " $warn " in
231 warn="$warn $opt"
237 case "$warn" in
241 warn="$warn $opt"
247 warn="$warn $opt"
255 case "$ccflags$warn" in
263 case "$ccflags$warn" in
[all …]
/openbsd-src/gnu/usr.bin/perl/t/comp/
H A Dredef.t6 $warn = "";
7 $SIG{__WARN__} = sub { $warn .= join("",@_) }
21 ok 1, $warn =~ s/Subroutine sub0 redefined[^\n]+\n//s;
26 ok 2, $warn =~ s/$NEWPROTO \Qsub main::sub1: none vs ()\E[^\n]+\n//s;
27 ok 3, $warn =~ s/Subroutine sub1 redefined[^\n]+\n//s;
32 ok 4, $warn =~ s/$NEWPROTO \Qsub main::sub2: none vs ($)\E[^\n]+\n//s;
33 ok 5, $warn =~ s/Subroutine sub2 redefined[^\n]+\n//s;
38 ok 6, $warn =~ s/$NEWPROTO \Qsub main::sub3 () vs none\E[^\n]+\n//s;
39 ok 7, $warn =~ s/Constant subroutine sub3 redefined[^\n]+\n//s;
44 ok 8, $warn =~ s/Constant subroutine sub4 redefined[^\n]+\n//s;
[all …]
H A Dproto.t652 my $warn = "";
656 $warn .= $thiswarn;
662 if ($warn eq '') {
665 print "not ok ", $i++, "# $warn \n";
717 my $warn = "";
718 local $SIG{__WARN__} = sub { $warn .= join("",@_) };
721 print "not " unless $warn =~ /Illegal character in prototype for main::badproto : \@bar/;
725 print "not " unless $warn =~ /Illegal character in prototype for main::badproto2 : bar/;
729 print "not " unless $warn =~ /Illegal character in prototype for main::badproto3 : &\$bar\$\@/;
734 print "not " unless $warn =~ /Illegal character in prototype for main::badproto4 : \@ \$b ar/;
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/Encode/t/
H A Dutf32warnings.t18 our $warn;
19 $SIG{__WARN__} = sub { $warn = $_[0] };
24 local $warn;
26 …is($warn, undef, "Calling encode on UTF32-LE encode object with valid string produces no warnings"…
32 local $warn;
34 …like($warn, qr/UTF-16 surrogate.* at $script line /, "Calling encode on UTF32-LE encode object wit…
38 local $warn;
41 …is($warn, undef, "Warning from encode method of UTF32-LE encode object can be silenced via no warn…
45 local $warn;
48 …is($warn, undef, "Warning from encode method of UTF32-LE encode object can be silenced via no warn…
[all …]
/openbsd-src/gnu/usr.bin/perl/ext/XS-APItest/t/
H A Dcall.t84 "$description call_argv('f')") or warn "@{[call_argv('f', $flags, @$args)]}";
99 my $warn;
100 local $SIG{__WARN__} = sub { $warn .= $_[0] };
102 $warn = "";
107 is($warn, $exp_warn, "$desc G_EVAL call_sv('d') - warning");
110 $warn = "";
115 is($warn, $exp_warn, "$desc G_EVAL call_pv('d') - warning");
118 $warn = "";
123 is($warn, $exp_warn, "$desc G_EVAL call_argv('d') - warning");
126 $warn
[all...]
H A Dmortal_destructor.t7 warn "Before test_mortal_destructor_sv\n";
8 test_mortal_destructor_sv(sub { warn "in perl callback: ", $_[0],"\n" }, {});
9 warn "After test_mortal_destructor_sv\n";
11 warn "Before test_mortal_destructor_av\n";
12 test_mortal_destructor_av(sub { warn "in perl callback: @_\n" }, ["a","b","c"]);
13 warn "After test_mortal_destructor_av\n";
15 warn "Before test_mortal_destructor_x\n";
17 warn "After test_mortal_destructor_x\n";
/openbsd-src/usr.sbin/installboot/
H A Dutil.c47 warn("open %s", srcfile); in filecopy()
51 warn("fstat"); in filecopy()
58 warn("open %s", dstfile); in filecopy()
63 warn("chown"); in filecopy()
67 warn("chmod"); in filecopy()
72 warn("malloc"); in filecopy()
79 warn("read"); in filecopy()
85 warn("write"); in filecopy()
107 warn("malloc"); in fileprefix()
112 warn("snprintf"); in fileprefix()
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/IO/t/
H A DIO.t40 my $warn = '' ;
41 local $SIG{__WARN__} = sub { $warn = "@_" } ;
46 is( $warn, '', "... import default, should not warn");
47 $warn = '' ;
54 is( $warn, '', "... import default, should not warn");
55 $warn = '' ;
61 like( $warn, qr/^Parameterless "use IO" deprecated at/,
63 $warn = '' ;
69 like( $warn, qr/^Parameterless "use IO" deprecated at/,
71 $warn = '' ;
[all …]
/openbsd-src/gnu/usr.bin/perl/t/io/
H A Dperlio_fail.t13 my $warn;
15 $SIG{__WARN__} = sub { $warn = shift };
23 $warn = ''; $! = 0;
27 like($warn,qr/in PerlIO layer/,"Got warning");
29 $warn = ''; $! = 0;
33 like($warn,qr/nonesuch/,"Got warning");
36 $warn = ''; $! = 0;
40 like($warn,qr/in PerlIO layer/,"Got warning");
42 $warn = ''; $! = 0;
46 like($warn,qr/nonesuch/,"Got warning");
/openbsd-src/bin/cp/
H A Dutils.c78 warn("%s", entp->fts_path); in copy_file()
109 warn("%s", to.p_path); in copy_file()
126 warn("mmap: %s", entp->fts_path); in copy_file()
131 warn("%s", to.p_path); in copy_file()
136 warn("%s", entp->fts_path); in copy_file()
153 warn("%s", to.p_path); in copy_file()
161 warn("%s", entp->fts_path); in copy_file()
183 warn("%s", to.p_path); in copy_file()
187 warn("%s", to.p_path); in copy_file()
193 warn("%s", to.p_path); in copy_file()
[all …]
/openbsd-src/usr.sbin/sa/
H A Dusrdb.c71 warn("retrieving user accounting summary"); in usracct_init()
77 warn("retrieving user accounting summary"); in usracct_init()
84 warn("initializing user accounting stats"); in usracct_init()
91 warn("retrieving user accounting summary"); in usracct_init()
99 warn("closing user accounting summary"); in usracct_init()
114 warn("destroying user accounting stats"); in usracct_destroy()
131 warn("get key %u from user accounting stats", uid); in usracct_add()
157 warn("add key %u to user accounting stats", uid); in usracct_add()
181 warn("creating user accounting summary"); in usracct_update()
189 warn("retrieving user accounting stats"); in usracct_update()
[all …]
H A Dpdb.c68 warn("retrieving process accounting summary"); in pacct_init()
74 warn("retrieving process accounting summary"); in pacct_init()
81 warn("initializing process accounting stats"); in pacct_init()
88 warn("retrieving process accounting summary"); in pacct_init()
95 warn("closing process accounting summary"); in pacct_init()
109 warn("destroying process accounting stats"); in pacct_destroy()
126 warn("get key %s from process accounting stats", ci->ci_comm); in pacct_add()
143 warn("add key %s to process accounting stats", ci->ci_comm); in pacct_add()
164 warn("creating process accounting summary"); in pacct_update()
172 warn("retrieving process accounting stats"); in pacct_update()
[all …]
/openbsd-src/regress/usr.bin/mandoc/mdoc/Tg/
H A Dwarn.out_tag1 NAME warn.mandoc_ascii 3
2 DESCRIPTION warn.mandoc_ascii 6
3 start-tag warn.mandoc_ascii 9
4 macro warn.mandoc_ascii 9
5 sub warn.mandoc_ascii 9
6 double warn.mandoc_ascii 11
7 examples warn.mandoc_ascii 14
H A Dwarn.out_lint1 mandoc: warn.in:16:2: WARNING: skipping empty macro: Tg
2 mandoc: warn.in:16:8: ERROR: skipping excess arguments: Tg ... ignored
3 mandoc: warn.in:18:5: ERROR: skipping tag containing whitespace: Tg \&badstart
4 mandoc: warn.in:20:11: ERROR: skipping tag containing whitespace: Tg badend\&
5 mandoc: warn.in:22:10: ERROR: skipping tag containing whitespace: Tg white space
6 mandoc: warn.in:34:2: WARNING: skipping empty macro: Tg
/openbsd-src/sbin/wsconsctl/
H A Dkeyboard.c82 warn("WSKBDIO_GTYPE"); in keyboard_get_values()
92 warn("WSKBDIO_GETBELL"); in keyboard_get_values()
103 warn("WSKBDIO_GETDEFAULTBELL"); in keyboard_get_values()
108 warn("WSKBDIO_GETMAP"); in keyboard_get_values()
110 warn("WSKBDIO_GETENCODING"); in keyboard_get_values()
121 warn("WSKBDIO_GETKEYREPEAT"); in keyboard_get_values()
130 warn("WSKBDIO_GETDEFAULTKEYREPEAT"); in keyboard_get_values()
134 warn("WSKBDIO_GETLEDS"); in keyboard_get_values()
138 warn("WSKBDIO_GETENCODING"); in keyboard_get_values()
147 warn("WSKBDIO_GETBACKLIGHT"); in keyboard_get_values()
[all …]
/openbsd-src/gnu/usr.bin/perl/lib/
H A Ddiagnostics.t32 warn('gmtime(nan) too large');
38 warn("accept() on closed socket spanner");
44 warn
51 warn 'Deep recursion on anonymous subroutine';
56 warn 'Deep recursion on subroutine "foo"';
63 warn "Execution of -e aborted due to compilation errors.\n";
69 warn "Bad arg length for us, is 4, should be 42";
75 warn "Unicode surrogate U+C0FFEE is illegal in UTF-8";
81 warn "Slab leaked from cv fadedc0ffee";
87 warn "syntax error";
[all …]
/openbsd-src/usr.sbin/acme-client/
H A Dfileproc.c39 warn("asprintf"); in serialise()
44 warn("link"); in serialise()
56 warn("asprintf"); in serialise()
60 warn("mkstemp"); in serialise()
64 warn("fchmod"); in serialise()
78 warn("%s", real); in serialise()
103 warn("unveil %s", certdir); in fileproc()
112 warn("pledge"); in fileproc()
141 warn("%s", certfile); in fileproc()
149 warn("%s", chainfile); in fileproc()
[all …]
H A Dchngproc.c42 warn("unveil %s", root); in chngproc()
47 warn("pledge"); in chngproc()
95 warn("asprintf"); in chngproc()
103 warn("realloc"); in chngproc()
108 warn("asprintf"); in chngproc()
122 warn("%s", fs[fsz - 1]); in chngproc()
126 warn("%s", fs[fsz - 1]); in chngproc()
130 warn("%s", fs[fsz - 1]); in chngproc()
160 warn("%s", fs[i]); in chngproc()
/openbsd-src/bin/mv/
H A Dmv.c161 warn("%s", from); in do_move()
221 warn("rename %s to %s", from, to); in do_move()
248 warn("can't remove %s", to); in do_move()
273 warn(NULL); in fastcopy()
280 warn("%s", from); in fastcopy()
284 warn("%s", to); in fastcopy()
297 warn("%s", to); in fastcopy()
301 warn("%s", from); in fastcopy()
303 warn("%s: remove", to); in fastcopy()
320 warn("%s: set mode", to); in fastcopy()
[all …]
/openbsd-src/gnu/usr.bin/perl/t/lib/
H A Ddeprecate.t44 my $warn = '';
45 { local $SIG{__WARN__} = sub { $warn .= $_[0]; };
52 like($warn, qr/^Deprecated\s+will\s+be\s+removed\b/, "$lib - message");
54 like($warn, qr/$me,?\s+line\s+1001\.?\n*$/, "$lib - location");
57 ok( !$warn, "$lib - no message" );
73 my $warn = '';
74 { local $SIG{__WARN__} = sub { $warn .= $_[0]; };
79 like($warn, qr/^Optionally::Deprecated\s+will\s+be\s+removed\b/,
83 ok( !$warn, "$lib - use if - no message" );
/openbsd-src/usr.sbin/fw_update/
H A Dfw_update.sh57 warn() { echo "$*" >&"$WARN_FD"; }
68 [ -s "$FD_DIR/warn" ] && cat "$FD_DIR/warn" >&2
178 warn "Cannot fetch $_src$_error"
214 warn "Signature check of SHA256.sig failed"
219 warn "${0##*/}: $CFILE: No such file or directory"
231 ((VERBOSE != 1)) && warn "Checksum test for ${1##*/} failed."
268 *) warn "${0##*/}: Bad pattern '${_m#$_nl}' in $FWPATTERNS"; exit 1 ;;
397 warn "Failed to extract name from $1, partial install"
404 warn "Faile
56 warn() { echo "$*" >&"$WARN_FD"; } global() function
[all...]
/openbsd-src/regress/usr.bin/mandoc/mdoc/Fo/
H A Dwarn.out_lint1 mandoc: warn.in:10:8: WARNING: parenthesis in function name: sin()
2 mandoc: warn.in:14:19: WARNING: comma in function argument: double y, double x
3 mandoc: warn.in:16:10: WARNING: parenthesis in function name: close)
4 mandoc: warn.in:22:5: WARNING: parenthesis in function name: (open
5 mandoc: warn.in:24:5: WARNING: parenthesis in function name: (*popen
6 mandoc: warn.in:26:5: WARNING: parenthesis in function name: (trail)x

12345678910>>...46