Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created August 14, 2019 21:44
Show Gist options
  • Save Whateverable/6627e132b1e07d6782e5104750c79eef to your computer and use it in GitHub Desktop.
Save Whateverable/6627e132b1e07d6782e5104750c79eef to your computer and use it in GitHub Desktop.
greppable6
X\:\:AdHoc
File Code
ELIZABETH/Scalar-Util
…/Util.pm6 :79:
CATCH { when X::AdHoc { @messages.push(.message); .resume } }
ELIZABETH/Scalar-Util
…/01-basic.t :20:
when X::AdHoc {
ELIZABETH/Sub-Util
…/Util.pm6 :54:
CATCH { when X::AdHoc { @messages.push(.message); .resume } }
ELIZABETH/Sub-Util
…/01-basic.t :18:
when X::AdHoc {
FRITH/Desktop-Notify-Progress
…/Progress.pm6 :14:
X::AdHoc.new(payload => 'File not found').throw if ! $filename.IO.e;
FRITH/Desktop-Notify-Progress
…/Progress.pm6 :21:
X::AdHoc.new(payload => 'File not opened').throw if ! $fh.opened;
FRITH/Desktop-Notify-Progress
…/Progress.pm6 :28:
X::AdHoc.new(payload => '$size must be > 0').throw if $size.defined && $size ≤ 0;
FRITH/Desktop-Notify-Progress
…/01-basic.t :14:
X::AdHoc,
FRITH/Desktop-Notify-Progress
…/01-basic.t :22:
X::AdHoc,
FRITH/Desktop-Notify-Progress
…/01-basic.t :33:
X::AdHoc,
FRITH/Image-QRCode
…/QRCode.pm6 :92:
fail X::AdHoc.new: errno => 1, error => 'No data to plot' if ! $!qrcode.defined;
HANENKAMP/Future
…/README.md :228:
-> X::AdHoc $x { .payload }),
HANENKAMP/Future
…/Future.pm6 :535:
-> X::AdHoc $x { .payload }),
HANENKAMP/Future
…/00-basic.t :52:
my $f = Future.exceptional(X::AdHoc.new(:message<bad stuff>));
HMBRAND/Text-CSV
…/79_callbacks.t :126:
[ Str, "error" ], # X::AdHoc.new
HMBRAND/Text-CSV
…/79_callbacks.t :128:
[ "%23bad", sub {} ], # X::AdHoc.new
JNTHN/Cro-HTTP
…/Client.pm6 :149:
self.break-all-responses(X::AdHoc.new(message => 'Connection to server lost'));
JNTHN/Cro-HTTP
…/http-middleware.t :873:
X::AdHoc, message => /'delegate'/, 'Better exception message when user tries to include route with before/after';
JNTHN/OpenAPI-Model
…/Element.pm6 :73:
when X::AdHoc { next }
JSTOWE/AccessorFacade
…/010-compose.t :69:
throws-like { $a.poww = 'food' }, X::AdHoc, payload => 'with *food*' , '&after got called';
JSTOWE/AccessorFacade
…/010-compose.t :70:
throws-like { $a.poww-named = 'food' }, X::AdHoc, payload => 'with *food*' , 'after got called (named)';
JSTOWE/AccessorFacade
…/010-compose.t :71:
throws-like { $a.bosh = 'duck' },X::AdHoc, payload => 'with duck' , '&after got called (no &before)';
JSTOWE/AccessorFacade
…/010-compose.t :72:
throws-like { $a.bosh-named = 'duck' }, X::AdHoc, payload => 'with duck' , 'after got called (no before) (named)';
JSTOWE/Audio-Sndfile
…/030-constructor.t :55:
throws-like { $f = Audio::Sndfile.new(filename => "bogus-test-file.wav", :r) },X::AdHoc,message => "System error : No such file or directory.", "constructor with bogus filename";
JSTOWE/Lumberjack
…/020-class.t :32:
throws-like { Lumberjack::Message.new }, X::AdHoc, "message with message";
MARTIMM/GTK-V3
…/X.pm6 :29:
# X::AdHoc
MARTIMM/GTK-V3
…/X.pm6 :38:
# X::AdHoc, X::TypeCheck::Argument or some messages
NINE/Inline-Perl5
…/README.md :339:
Perl 5's exceptions (die) are translated to X::AdHoc exceptions in Perl 6 and
NINE/Inline-Perl5
…/README.md :346:
when X::AdHoc {
NINE/Inline-Perl5
…/exceptions.t :13:
ok $!.isa('X::AdHoc'), 'got an exception';
NINE/Inline-Perl5
…/exceptions.t :24:
ok $!.isa('X::AdHoc'), 'got an exception from function call';
NINE/Inline-Perl5
…/exceptions.t :37:
when X::AdHoc {
NINE/Inline-Perl5
…/exceptions.t :38:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
NINE/Inline-Perl5
…/exceptions.t :57:
when X::AdHoc {
NINE/Inline-Perl5
…/exceptions.t :58:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
NINE/Inline-Perl5
…/exceptions.t :74:
when X::AdHoc {
NINE/Inline-Perl5
…/exceptions.t :75:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
NINE/Inline-Perl5
…/exceptions.t :113:
when X::AdHoc {
NINE/Inline-Perl5
…/exceptions.t :114:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
SAMGWISE/PowerNap
…/Controller.pm6 :32:
when X::AdHoc {
TYIL/Dist-Helper
…/Template.pm6 :17:
X::AdHoc.new(payload => "Resource '$absolute' does not exist").throw unless %?RESOURCES{$absolute};
TYIL/Dist-Helper
…/Template.pm6 :28:
X::AdHoc.new(payload => "$destination already exists").throw if $destination.IO.e && !$clobber;
UFOBAT/Bailador
…/Request.pm :20:
when X::AdHoc {
VRURG/AttrX-Mooish
…/020-role.t :117:
X::AdHoc,
VRURG/Cro-RPC-JSON
…/050-request.t :169:
exception => 'X::AdHoc',
Bailador/Bailador
…/Request.pm :20:
when X::AdHoc {
FCO/Test-Fuzz
…/classes :104:
X::AdHoc
FCO/test-time
…/01-tdd.t :10:
throws-like { unmock-time }, X::AdHoc, :message => "Time isn't mocked yet";
MARTIMM/semaphore-readerswriters
…/100-rw.t :30:
when X::AdHoc {
MadcapJake/Test-Lab
…/020-experiment.t :131:
when X::AdHoc {
MadcapJake/Test-Lab
…/020-experiment.t :517:
is $lines[4], ' X::AdHoc.new(payload => "error")';
PostCocoon/P6-TagLibC
…/Wrapper.pm6 :32:
X::AdHoc.new(payload => "File doesn't exist: $path").throw;
PostCocoon/P6-TagLibC
…/Wrapper.pm6 :99:
X::AdHoc.new(payload => "Wrapper is destroyed and can't be used anymore").throw;
PostCocoon/P6-TagLibC
…/Wrapper.pm6 :103:
X::AdHoc.new(payload => "File pointer isn't vaild").throw;
PostCocoon/P6-Url
…/Url.pm6 :165:
X::AdHoc.new(payload => "$uri is not an valid url").throw;
Skarsnik/nativecall-typediag
…/TypeDiag.pm6 :139:
when X::AdHoc {
Tux/CSV
…/79_callbacks.t :126:
[ Str, "error" ], # X::AdHoc.new
Tux/CSV
…/79_callbacks.t :128:
[ "%23bad", sub {} ], # X::AdHoc.new
ajs/perl6-Math-Sequences
…/sequences.t :8:
is $!.WHAT, X::AdHoc, "Throws error";
atweiden/config-toml
…/Actions.pm6 :713:
when X::AdHoc
atweiden/crane
…/Remove.pm6 :31:
when X::AdHoc
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :13:
ok $!.isa('X::AdHoc'), 'got an exception';
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :23:
ok $!.isa('X::AdHoc'), 'got an exception from function call';
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :36:
when X::AdHoc {
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :37:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :46:
when X::AdHoc {
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :47:
ok $_.isa('X::AdHoc'), 'got an exception for calling a missing function';
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :61:
when X::AdHoc {
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :62:
ok $_.isa('X::AdHoc'), 'got an exception for calling missing method';
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :94:
when X::AdHoc {
awwaiid/p6-Inline-Ruby
…/exceptions.t.todo :95:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
bradclawsie/DB-Rscs
…/Rscs.pm6 :57:
X::AdHoc.new(:payload<'cannot connect'>).throw unless self.alive.so;
bradclawsie/DB-Rscs
…/Rscs.pm6 :70:
X::AdHoc.new(:payload<$resp>).throw;
bradclawsie/DB-Rscs
…/Rscs.pm6 :79:
X::AdHoc.new(:payload<$resp>).throw;
bradclawsie/DB-Rscs
…/Rscs.pm6 :90:
X::AdHoc.new(:payload<$resp>).throw;
bradclawsie/DB-Rscs
…/Rscs.pm6 :100:
X::AdHoc.new(:payload<$resp>).throw;
bradclawsie/DB-Rscs
…/Rscs.pm6 :109:
X::AdHoc.new(:payload<$resp>).throw;
briandfoy/perl6-PrettyDump
…/PrettyDump.pm6 :353:
fail X::AdHoc.new: payload => "Signature should be:\n\t:{$needed-sig.gist}\nbut got\n\t:{$sig.gist}";
cedric-vincent/kains
…/Commandline.pm6 :53:
when X::AdHoc {
cedric-vincent/kains
…/Chrooted.pm6 :44:
or X::AdHoc
erickjordan/perl6-Parse-STDF
…/STDF.pm6 :37:
# First native call is done here, can trigger X::AdHoc if libstdf is missing.
fayland/perl6-Gravatar-URL
…/gravatar.t :6:
throws-like { gravatar_url() }, X::AdHoc, 'throw gravatar_url without email';
fayland/perl6-WebService-GitHub
…/Issues.pm :9:
die X::AdHoc.new("State does not exist").throw if $state ne "open"|"closed"|"all" ;
hartenfels/JavaScript-SpiderMonkey
…/04_call.t :44:
# This returns X::AdHoc instead of X::TypeCheck::Binding, see perl #126763
hartenfels/JavaScript-SpiderMonkey
…/04_call.t :45:
throws-like { .no-kebap }, X::AdHoc, 'calling kebap-case fails';
jnthn/test-mock
…/computing.t :59:
throws-like { $yaktivity.proccess() }, X::AdHoc, message => "Boom!";
jonathanstowe/Audio-Sndfile
…/005-constructor.t :54:
throws-like { $f = Audio::Sndfile.new(filename => "bogus-test-file.wav", :r) },X::AdHoc,message => "System error : No such file or directory.", "constructor with bogus filename";
jonathanstowe/Lumberjack
…/020-class.t :32:
throws-like { Lumberjack::Message.new }, X::AdHoc, "message with message";
masak/007
…/custom-ops.t :22:
parse-error $program, X::AdHoc, "infix:n should not be defined unless we define it";
masak/007
…/custom-ops.t :35:
parse-error $program, X::AdHoc, "infix:n should not be usable outside of its scope";
niner/Inline-Python
…/exceptions.t :13:
ok $!.isa('X::AdHoc'), 'got an exception';
niner/Inline-Python
…/exceptions.t :23:
ok $!.isa('X::AdHoc'), 'got an exception from function call';
niner/Inline-Python
…/exceptions.t :36:
when X::AdHoc {
niner/Inline-Python
…/exceptions.t :37:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
niner/Inline-Python
…/exceptions.t :46:
when X::AdHoc {
niner/Inline-Python
…/exceptions.t :47:
ok $_.isa('X::AdHoc'), 'got an exception for calling a missing function';
niner/Inline-Python
…/exceptions.t :61:
when X::AdHoc {
niner/Inline-Python
…/exceptions.t :62:
ok $_.isa('X::AdHoc'), 'got an exception for calling missing method';
niner/Inline-Python
…/exceptions.t :94:
when X::AdHoc {
niner/Inline-Python
…/exceptions.t :95:
ok $_.isa('X::AdHoc'), 'got an exception from method call';
nkh/P6-Data-Dump-Tree
…/32.exception.t :11:
my $dump = $d.ddt: :get, X::AdHoc.new(payload => 'text'), :!color ;
perl6/Blin
…/blin.p6 :266:
when X::AdHoc { # TODO proper exception
perl6/DBIish
…/Pg.pm6 :86:
CATCH { when X::AdHoc { } }
perl6/DBIish
…/DBIish.pm6 :30:
# The first native call done by the driver can trigger an X::AdHoc
perl6/DBIish
…/41-sqlite-exec-error.t :10:
}, X::AdHoc, 'Need database';
perl6/doc
…/5to6-perlvar.pod6 :572:
X::AdHoc : Boooh
perl6/doc
…/5to6-perlvar.pod6 :574:
X::AdHoc : Boooh
perl6/doc
…/concurrency.pod6 :56:
# OUTPUT: «X::AdHoc+{X::Promise::Broken}: oh no␤»
perl6/doc
…/containers.pod6 :136:
# OUTPUT: «X::AdHoc: Cannot assign to an immutable value␤»
perl6/doc
…/control.pod6 :928:
# OUTPUT: «X::AdHoc: WELP!␤»
perl6/doc
…/exceptions.pod6 :187:
when X::AdHoc { .Str.say; .resume }
perl6/doc
…/exceptions.pod6 :209:
Since the C<CATCH> block is handling just the C<X::AdHoc> exception
perl6/doc
…/exceptions.pod6 :265:
# OUTPUT: «Error 111 X::AdHoc: Something bad happened␤»
perl6/doc
…/exceptions.pod6 :278:
X::AdHoc.new(:payload<foo>).throw;
perl6/doc
…/exceptions.pod6 :281:
when X::AdHoc { .resume }
perl6/doc
…/exceptions.pod6 :293:
X::AdHoc.new(:payload<foo>).throw;
perl6/doc
…/exceptions.pod6 :308:
X::AdHoc.new(:payload<foo>).throw;
perl6/doc
…/exceptions.pod6 :311:
when X::AdHoc { }
perl6/doc
…/exceptions.pod6 :331:
CATCH { when X::AdHoc { .resume } } # this is step 2
perl6/doc
…/exceptions.pod6 :359:
# Error X::AdHoc: Something bad happened
perl6/doc
…/exceptions.pod6 :377:
class X::WithoutLineNumber is X::AdHoc {
perl6/doc
…/hashmap.pod6 :225:
# OUTPUT: «X::AdHoc: Type Block does not support associative indexing.␤»
perl6/doc
…/hashmap.pod6 :451:
# OUTPUT: «X::AdHoc: Cannot assign to a readonly variable or a value␤»
perl6/doc
…/operators.pod6 :902:
Crossing 0 is prohibited and throws C<X::AdHoc>.
perl6/doc
…/regexes.pod6 :1373:
# OUTPUT: «X::AdHoc: Cannot find ']' near position 4␤»
perl6/doc
…/traps.pod6 :1019:
say !%x<b>:exists; # dies with X::AdHoc
perl6/doc
…/typesystem.pod6 :633:
# OUTPUT: «X::AdHoc: Could not instantiate role 'R':␤Please provide a parameter to role R␤»
perl6/doc
…/Blob.pod6 :80:
On malformed utf-8 C<.decode> will throw X::AdHoc. To handle sloppy utf-8 use
perl6/doc
…/Channel.pod6 :160:
# OUTPUT: «X::AdHoc: Bad error happens!␤»
perl6/doc
…/Exception.pod6 :12:
C<X::AdHoc> object, which also inherits from C<Exception>.
perl6/doc
…/Exception.pod6 :64:
my $exception = X::AdHoc.new; # Totally fine
perl6/doc
…/Exception.pod6 :89:
my $e = X::AdHoc.new(payload => "Bad situation");
perl6/doc
…/Exception.pod6 :104:
exception C<$e> - or, for the C<*@text> form, an L<X::AdHoc> exception
perl6/doc
…/Exception.pod6 :124:
my $e = X::AdHoc.new(payload => "This exception is pretty bad");
perl6/doc
…/Exception.pod6 :150:
type L<Exception|/type/Exception>, otherwise, it will be used as payload of L<X::AdHoc>
perl6/doc
…/Exception.pod6 :151:
exception. If C<$!> is not C<.DEFINITE>, L<X::AdHoc> with string
perl6/doc
…/Failure.pod6 :40:
# OUTPUT: «X::AdHoc: 2017-09-10T11:56:05.477237ZWELP‼␤»
perl6/doc
…/Failure.pod6 :72:
# OUTPUT: «X::AdHoc: Failed␤»
perl6/doc
…/Async.pod6 :115:
# X::AdHoc→ address already in use
perl6/doc
…/Promise.pod6 :166:
or with the default value C«X::AdHoc.new(payload => "Died")»
perl6/doc
…/Range.pod6 :258:
# OUTPUT: «X::AdHoc: Cannot return minmax on Range with excluded ends␤»
perl6/doc
…/Supplier.pod6 :76:
L<X::AdHoc> with the supplied message.
perl6/doc
…/AdHoc.pod6 :3:
=TITLE class X::AdHoc
perl6/doc
…/AdHoc.pod6 :8:
class X::AdHoc is Exception { }
perl6/doc
…/AdHoc.pod6 :10:
C<X::AdHoc> is the type into which objects are wrapped if they are
perl6/doc
…/AdHoc.pod6 :27:
Note that young code will often be prototyped using C<X::AdHoc> and
perl6/doc
…/AdHoc.pod6 :30:
C<X::AdHoc> – in many cases using the string returned by the
perl6/doc
…/AdHoc.pod6 :37:
method payload(X::AdHoc:D)
perl6/doc
…/type-graph.txt :259:
class X::AdHoc is Exception
perl6/doc
…/type-graph.txt :374:
class X::Comp::AdHoc is X::AdHoc does X::Comp
perl6/whateverable
…/Bits.pm6 :84:
class Whateverable::X::HandleableAdHoc is X::AdHoc is export {}
skids/perl6sum
…/Sum.pm6 :780:
$bw ||= X::AdHoc::new(message => "dont know nativesize of " ~ B.of.gist );
skids/perl6sum
…/libcrypto.pm6 :250:
X::AdHoc.new(:payload("int wrap in NativeCall length arg.")));
skids/perl6sum
…/libcrypto.pm6 :266:
# return Failure.new(X::AdHoc(:payload("Alloc size != used size")))
skids/perl6sum
…/libmhash.pm6 :98:
our $count = Failure.new(X::AdHoc.new(:payload("libmhash initialization")));
skids/perl6sum
…/libmhash.pm6 :245:
return Failure.new(X::AdHoc.new(:payload(
skids/perl6sum
…/librhash.pm6 :385:
Failure.new(X::AdHoc.new(:payload("Cannot be cloned.")))
skids/perl6sum
…/librhash.pm6 :466:
Failure.new(X::AdHoc.new(:payload("Cannot be cloned.")))
skids/perl6sum
…/librhash.t :48:
throws-like { my $c = $a.clone; +$c; }, X::AdHoc, "Attempt to clone Instance throws exception";
skids/perl6sum
…/librhash.t :60:
throws-like { my $c = $b.clone; +$c; }, X::AdHoc, "Attempt to clone wrapper class throws exception";
skids/perl6sum
…/sum.t :140:
my $fail = Failure.new(X::AdHoc.new(:payload<foo>));
spitsh/spitsh
…/SAST.pm6 :184:
X::AdHoc.new( payload => "{$node.^name} {try $node.gist} gave a literal Spit::Type type object").throw
spitsh/spitsh
…/SAST.pm6 :186:
X::AdHoc.new( payload => "{$node.^name} returned it's type as something that isn't a Spit::Type ({$node.type.^name}) ").throw
zoffixznet/perl6-Die
…/01-die.t :9:
throws-like { die }, X::AdHoc, message => /Died/,
zoffixznet/perl6-Die
…/01-die.t :11:
throws-like { die "foo" }, X::AdHoc, message => /foo/,
zoffixznet/perl6-Die
…/01-die.t :13:
throws-like { die X::Str::Numeric }, X::AdHoc, message => /'Str::Numeric'/,
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment