Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created February 25, 2017 05:00
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Whateverable/671cb0cbb9192aa56bd9760a3e641882 to your computer and use it in GitHub Desktop.
Save Whateverable/671cb0cbb9192aa56bd9760a3e641882 to your computer and use it in GitHub Desktop.
evalable6
https://gist.githubusercontent.com/zoffixznet/8ae188e136ccace378ca5d88bbc27685/raw/77385b2f96a8a6d1fbf0d723f92508b6b66c917f/p6.p6
(exit code 1)
--------------
&infix:<+|>
sub infix:<+|> (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48585536) ... }
wtf
----***-----
--------------
--------------
WhateverCode
(WhateverCode)
wtf
----***-----
--------------
--------------
SIGSEGV
SIGSEGV
wtf
----***-----
--------------
0
--------------
--------------
Slip
(Slip)
wtf
----***-----
--------------
--------------
&callframe
sub callframe (Int $level = 0) { #`(Sub|58740528) ... }
wtf
----***-----
--------------
--------------
Pair
(Pair)
wtf
----***-----
--------------
--------------
&keys
sub keys (| is raw) { #`(Sub|57573152) ... }
wtf
----***-----
--------------
--------------
SIGHUP
SIGHUP
wtf
----***-----
--------------
0
--------------
--------------
utf8
(utf8)
wtf
----***-----
--------------
--------------
&RETURN-LIST
sub RETURN-LIST (Mu \list) { #`(Sub|56639688) ... }
wtf
----***-----
--------------
--------------
&infix:<∖>
sub infix:<∖> (|p is raw) { #`(Sub+{<anon|78364928>}+{Precedence}|48591936) ... }
wtf
----***-----
--------------
--------------
CurrentThreadScheduler
(CurrentThreadScheduler)
wtf
----***-----
--------------
--------------
PromiseStatus
(PromiseStatus)
wtf
----***-----
--------------
--------------
StringyEnumeration
(StringyEnumeration)
wtf
----***-----
--------------
--------------
&infix:<ne>
sub infix:<ne> (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48580416) ... }
wtf
----***-----
--------------
--------------
Distribution
(Distribution)
wtf
----***-----
--------------
--------------
&infix:«<=»
sub infix:«<=» (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}|58271152) ... }
wtf
----***-----
--------------
--------------
&slip
sub slip (| is raw) { #`(Sub|58727152) ... }
wtf
----***-----
--------------
--------------
&splice
sub splice (@arr, |c is raw) { #`(Sub|58728976) ... }
wtf
----***-----
--------------
--------------
&trait_mod:<handles>
sub trait_mod:<handles> (| is raw) { #`(Sub|56635584) ... }
wtf
----***-----
--------------
--------------
&callsame
sub callsame () { #`(Sub|56643792) ... }
wtf
----***-----
--------------
--------------
&GATHER
sub GATHER (&block) { #`(Sub|58301248) ... }
wtf
----***-----
--------------
--------------
Backtrace
(Backtrace)
wtf
----***-----
--------------
--------------
&copy
sub copy ($from, $to, :$SPEC = { ... }, :$CWD = { ... }, :$createonly) { #`(Sub|58739920) ... }
wtf
----***-----
--------------
--------------
int16
(int16)
wtf
----***-----
--------------
--------------
CX
(CX)
wtf
----***-----
--------------
--------------
&print
sub print (| is raw) { #`(Sub|58732016) ... }
wtf
----***-----
--------------
--------------
&symlink
sub symlink ($target, $name, :$SPEC = { ... }, :$CWD = { ... }) { #`(Sub|58740224) ... }
wtf
----***-----
--------------
--------------
&asech
sub asech ($) { #`(Sub+{<anon|78364928>}|58033608) ... }
wtf
----***-----
--------------
--------------
NFKC
(NFKC)
wtf
----***-----
--------------
--------------
&GENERATE-ROLE-FROM-VALUE
sub GENERATE-ROLE-FROM-VALUE ($val) { #`(Sub|58746152) ... }
wtf
----***-----
--------------
--------------
&ORDER
sub ORDER (int $i) { #`(Sub|58290912) ... }
wtf
----***-----
--------------
--------------
Nil
Nil
wtf
----***-----
--------------
--------------
&append
sub append (\a, |elems is raw) { #`(Sub|58728520) ... }
wtf
----***-----
--------------
--------------
&prepend
sub prepend (\a, |elems is raw) { #`(Sub|58728824) ... }
wtf
----***-----
--------------
--------------
&METAOP_TEST_ASSIGN:<&&>
sub METAOP_TEST_ASSIGN:<&&> (\lhs, $rhs) { #`(Sub|58749648) ... }
wtf
----***-----
--------------
--------------
&METAOP_HYPER_POSTFIX
sub METAOP_HYPER_POSTFIX (| is raw) { #`(Sub|59235720) ... }
wtf
----***-----
--------------
--------------
Broken
Broken
wtf
----***-----
--------------
0
--------------
--------------
&sec
sub sec ($) { #`(Sub+{<anon|78364928>}|58025704) ... }
wtf
----***-----
--------------
--------------
Any
(Any)
wtf
----***-----
--------------
--------------
Junction
(Junction)
wtf
----***-----
--------------
--------------
array
(array)
wtf
----***-----
--------------
--------------
SOCK_MAX
SOCK_MAX
wtf
----***-----
--------------
0
--------------
--------------
&set
sub set (*@a --> Set) { #`(Sub+{Callable[Set]}|58744936) ... }
wtf
----***-----
--------------
--------------
&infix:<notandthen>
sub infix:<notandthen> (+ is raw) { #`(Sub+{Precedence}|48596256) ... }
wtf
----***-----
--------------
--------------
&unique
sub unique (| is raw) { #`(Sub|57581056) ... }
wtf
----***-----
--------------
--------------
Setty
(Setty)
wtf
----***-----
--------------
--------------
&infix:<o>
sub infix:<∘> (&?, &?) { #`(Sub|56204816) ... }
wtf
----***-----
--------------
--------------
&sleep-until
sub sleep-until ($until --> Bool) { #`(Sub+{Callable[Bool]}|58741440) ... }
wtf
----***-----
--------------
--------------
&METAOP_HYPER_POSTFIX_ARGS
sub METAOP_HYPER_POSTFIX_ARGS (| is raw) { #`(Sub|59236024) ... }
wtf
----***-----
--------------
--------------
&asec
sub asec ($) { #`(Sub+{<anon|78364928>}|58026312) ... }
wtf
----***-----
--------------
--------------
&next
sub next (| is raw) { #`(Sub|56642424) ... }
wtf
----***-----
--------------
--------------
&flat
sub flat (| is raw) { #`(Sub|58712560) ... }
wtf
----***-----
--------------
--------------
&unival
sub unival (| is raw) { #`(Sub|58015368) ... }
wtf
----***-----
--------------
--------------
FileChangeEvent
(FileChangeEvent)
wtf
----***-----
--------------
--------------
UInt64
(UInt64)
wtf
----***-----
--------------
--------------
&get
sub get (| is raw) { #`(Sub|58736576) ... }
wtf
----***-----
--------------
--------------
Rational
(Rational)
wtf
----***-----
--------------
--------------
&chop
sub chop (| is raw) { #`(Sub|57584704) ... }
wtf
----***-----
--------------
--------------
RatStr
(RatStr)
wtf
----***-----
--------------
--------------
&infix:<**>
sub infix:<**> (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48585056) ... }
wtf
----***-----
--------------
--------------
Macro
(Macro)
wtf
----***-----
--------------
--------------
uint64
(uint64)
wtf
----***-----
--------------
--------------
Numeric
(Numeric)
wtf
----***-----
--------------
--------------
&max
sub max (+ is raw, :&by = { ... }) { #`(Sub|57578472) ... }
wtf
----***-----
--------------
--------------
&METAOP_NEGATE
sub METAOP_NEGATE (\op) { #`(Sub|58750560) ... }
wtf
----***-----
--------------
--------------
Cursor
(Cursor)
wtf
----***-----
--------------
--------------
&proceed
sub proceed ( --> Nil) { #`(Sub+{Callable[Nil]}|56643336) ... }
wtf
----***-----
--------------
--------------
&infix:<eqv>
sub infix:<eqv> ($?, $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48579776) ... }
wtf
----***-----
--------------
--------------
&mix
sub mix (*@a --> Mix) { #`(Sub+{Callable[Mix]}|58745240) ... }
wtf
----***-----
--------------
--------------
SIGPIPE
SIGPIPE
wtf
----***-----
--------------
0
--------------
--------------
Instant
(Instant)
wtf
----***-----
--------------
--------------
byte
(byte)
wtf
----***-----
--------------
--------------
&trait_mod:<hides>
sub trait_mod:<hides> (| is raw) { #`(Sub|56639232) ... }
wtf
----***-----
--------------
--------------
&infix:«~<»
sub infix:«~<» (;; Mu | is raw) { #`(Sub|58297296) ... }
wtf
----***-----
--------------
--------------
&infix:<⊎>
sub infix:<⊎> (|p is raw) { #`(Sub+{<anon|78364928>}+{Precedence}|48594816) ... }
wtf
----***-----
--------------
--------------
&uniprop
sub uniprop (| is raw) { #`(Sub|58013088) ... }
wtf
----***-----
--------------
--------------
&squish
sub squish (| is raw) { #`(Sub|57581360) ... }
wtf
----***-----
--------------
--------------
&infix:<∩>
sub infix:<∩> (|p is raw) { #`(Sub+{<anon|78364928>}+{Precedence}|48591616) ... }
wtf
----***-----
--------------
--------------
&ceiling
sub ceiling ($) { #`(Sub+{<anon|78364928>}|58038320) ... }
wtf
----***-----
--------------
--------------
Regex
(Regex)
wtf
----***-----
--------------
--------------
Bool
(Bool)
wtf
----***-----
--------------
--------------
SOCK_RAW
SOCK_RAW
wtf
----***-----
--------------
0
--------------
--------------
&infix:<coll>
sub infix:<coll> (| is raw) { #`(Sub+{Precedence}|48588576) ... }
wtf
----***-----
--------------
--------------
&infix:<xx>
sub infix:<xx> (| is raw) { #`(Sub+{Precedence}|48589536) ... }
wtf
----***-----
--------------
--------------
&postcircumfix:<[ ]>
sub postcircumfix:<[ ]> (| is raw) { #`(Sub+{<anon|78365200>}+{Precedence}+{<anon|78365200>}|48589856) ... }
wtf
----***-----
--------------
--------------
&homedir
sub homedir ($path, :$test = { ... }) { #`(Sub|58738704) ... }
wtf
----***-----
--------------
--------------
&postfix:<i>
sub postfix:<i> (\a --> Complex:D) { #`(Sub+{Callable[Complex:D]}+{<anon|78364928>}+{Precedence}|48590016) ... }
wtf
----***-----
--------------
--------------
SIGBUS
SIGBUS
wtf
----***-----
--------------
0
--------------
--------------
&uc
sub uc (Cool $s) { #`(Sub|58008376) ... }
wtf
----***-----
--------------
--------------
Associative
(Associative)
wtf
----***-----
--------------
--------------
Iterator
(Iterator)
wtf
----***-----
--------------
--------------
&infix:<∈>
sub infix:<∈> ($a, $b --> Bool) { #`(Sub+{Callable[Bool]}+{<anon|78364928>}+{Precedence}|48590336) ... }
wtf
----***-----
--------------
--------------
&sech
sub sech ($) { #`(Sub+{<anon|78364928>}|58033000) ... }
wtf
----***-----
--------------
--------------
SOCK_DGRAM
SOCK_DGRAM
wtf
----***-----
--------------
0
--------------
--------------
&VAR
sub VAR (Mu \x) { #`(Sub|58746760) ... }
wtf
----***-----
--------------
--------------
&sin
sub sin ($) { #`(Sub+{<anon|78364928>}|58022056) ... }
wtf
----***-----
--------------
--------------
uint32
(uint32)
wtf
----***-----
--------------
--------------
&roll
sub roll (| is raw) { #`(Sub|57572848) ... }
wtf
----***-----
--------------
--------------
&chdir
sub chdir ($path, :$test = "r") { #`(Sub|58738248) ... }
wtf
----***-----
--------------
--------------
&infix:<..^>
sub infix:<..^> ($min, $max) { #`(Sub+{<anon|78364928>}+{Precedence}|48589056) ... }
wtf
----***-----
--------------
--------------
&prompt
sub prompt ($msg) { #`(Sub|58734904) ... }
wtf
----***-----
--------------
--------------
&open
sub open (| is raw) { #`(Sub|58735664) ... }
wtf
----***-----
--------------
--------------
&slurp
sub slurp (| is raw) { #`(Sub|58737488) ... }
wtf
----***-----
--------------
--------------
&METAOP_HYPER_CALL
sub METAOP_HYPER_CALL (\list, |args is raw) { #`(Sub|59236784) ... }
wtf
----***-----
--------------
--------------
&rindex
sub rindex ($, $, $?) { #`(Sub+{<anon|78364928>}|58009136) ... }
wtf
----***-----
--------------
--------------
&chomp
sub chomp (Cool:D $s --> Str) { #`(Sub+{Callable[Str]}|57585160) ... }
wtf
----***-----
--------------
--------------
Perl
(Perl)
wtf
----***-----
--------------
--------------
&infix:«<=>»
sub infix:«<=>» (Mu $, Mu $?) { #`(Sub+{<anon|78364928>}|58266136) ... }
wtf
----***-----
--------------
--------------
&flip
sub flip (Cool $s --> Str) { #`(Sub+{Callable[Str]}|57585312) ... }
wtf
----***-----
--------------
--------------
PROCESS
(PROCESS)
wtf
----***-----
--------------
--------------
&return-rw
sub return-rw (| is raw) { #`(Sub|56639840) ... }
wtf
----***-----
--------------
--------------
&infix:<⊉>
sub infix:<⊉> ($a, $b --> Bool) { #`(Sub+{Callable[Bool]}+{<anon|78364928>}+{Precedence}|48593696) ... }
wtf
----***-----
--------------
--------------
&log10
sub log10 ($, $?) { #`(Sub+{<anon|78364928>}|58021144) ... }
wtf
----***-----
--------------
--------------
&MD-ARRAY-SLICE-ONE-POSITION
sub MD-ARRAY-SLICE-ONE-POSITION (\SELF, \indices, \idx, int $dim, \target) { #`(Sub|58726848) ... }
wtf
----***-----
--------------
--------------
tau
6.28318530717959
wtf
----***-----
--------------
--------------
SOCK_PACKET
SOCK_PACKET
wtf
----***-----
--------------
0
--------------
--------------
&infix:<but>
sub infix:<but> (| is raw) { #`(Sub+{<anon|78364928>}+{Precedence}|48575776) ... }
wtf
----***-----
--------------
--------------
&METAOP_CROSS
sub METAOP_CROSS (\op, &reduce) { #`(Sub|58750864) ... }
wtf
----***-----
--------------
--------------
SIGXFSZ
SIGXFSZ
wtf
----***-----
--------------
0
--------------
--------------
&AUTOTHREAD_METHOD
sub AUTOTHREAD_METHOD ($name, |c is raw) { #`(Sub|51457232) ... }
wtf
----***-----
--------------
--------------
$RAKUDO-VERBOSE-STACKFRAME
0
wtf
----***-----
--------------
--------------
&infix:<~~>
sub infix:<~~> (Mu \topic, Mu \matcher) { #`(Sub+{Precedence}|48579616) ... }
wtf
----***-----
--------------
--------------
pi
3.14159265358979
wtf
----***-----
--------------
--------------
&pack
sub pack (| is raw) { #`(Sub|58296232) ... }
wtf
----***-----
--------------
--------------
ProtocolFamily
(ProtocolFamily)
wtf
----***-----
--------------
--------------
&infix:«(<=)»
sub infix:«(<=)» ($, $ --> Bool) { #`(Sub+{Callable[Bool]}+{<anon|78364928>}+{Precedence}|48592416) ... }
wtf
----***-----
--------------
--------------
&trait_mod:<is>
sub trait_mod:<is> (| is raw) { #`(Sub|56625248) ... }
wtf
----***-----
--------------
--------------
&indir
sub indir ($path, $what, :$test = { ... }) { #`(Sub|58738400) ... }
wtf
----***-----
--------------
--------------
&METAOP_REDUCE_LIST
sub METAOP_REDUCE_LIST (| is raw) { #`(Sub|59234048) ... }
wtf
----***-----
--------------
--------------
SIGILL
SIGILL
wtf
----***-----
--------------
0
--------------
--------------
π
3.14159265358979
wtf
----***-----
--------------
--------------
IntLexRef
(IntLexRef)
wtf
----***-----
--------------
--------------
SIGUSR2
SIGUSR2
wtf
----***-----
--------------
0
--------------
--------------
&infix:«+>»
sub infix:«+>» (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}|58280576) ... }
wtf
----***-----
--------------
--------------
&acosec
sub acosec (| is raw) { #`(Sub+{<anon|78364928>}|58027528) ... }
wtf
----***-----
--------------
--------------
WrapDispatcher
(WrapDispatcher)
wtf
----***-----
--------------
--------------
&infix:<...^>
sub infix:<...^> (| is raw) { #`(Sub|58747216) ... }
wtf
----***-----
--------------
--------------
&run
sub run (*@args (Any $, *@), :$in = "-", :$out = "-", :$err = "-", Bool :$bin, Bool :$chomp = Bool::True, Bool :$merge, Str:D :$enc = "utf8", Str:D :$nl = "\n", :$cwd = { ... }, :$env) { #`(Sub|59241952) ... }
wtf
----***-----
--------------
--------------
&lsb
sub lsb ($) { #`(Sub|58284984) ... }
wtf
----***-----
--------------
--------------
&uniprop-str
sub uniprop-str (| is raw) { #`(Sub|58014608) ... }
wtf
----***-----
--------------
--------------
Sub
(Sub)
wtf
----***-----
--------------
--------------
&infix:<=>
sub infix:<=> (Mu \a, Mu \b) { #`(Sub+{Precedence}|48595616) ... }
wtf
----***-----
--------------
--------------
Set
(Set)
wtf
----***-----
--------------
--------------
&circumfix:<:{ }>
sub (*@elems) { #`(Sub|56624944) ... }
wtf
----***-----
--------------
--------------
&pairs
sub pairs (| is raw) { #`(Sub|57573760) ... }
wtf
----***-----
--------------
--------------
&rand
sub rand ( --> Num:D) { #`(Sub+{Callable[Num:D]}|58295928) ... }
wtf
----***-----
--------------
--------------
&infix:<min>
sub infix:<min> (| is raw) { #`(Sub+{<anon|78364928>}+{Precedence}|48582976) ... }
wtf
----***-----
--------------
--------------
&put
sub put (| is raw) { #`(Sub|58733384) ... }
wtf
----***-----
--------------
--------------
&gethostname
sub gethostname ( --> Str) { #`(Sub+{Callable[Str]}|59242864) ... }
wtf
----***-----
--------------
--------------
&METAOP_REDUCE_LISTINFIX
sub METAOP_REDUCE_LISTINFIX (| is raw) { #`(Sub|59234504) ... }
wtf
----***-----
--------------
--------------
&sinh
sub sinh ($) { #`(Sub+{<anon|78364928>}|58029352) ... }
wtf
----***-----
--------------
--------------
&infix:<leg>
sub infix:<leg> (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48580256) ... }
wtf
----***-----
--------------
--------------
Proc
(Proc)
wtf
----***-----
--------------
--------------
&infix:«(>+)»
sub infix:«(>+)» ($, $ --> Bool) { #`(Sub+{Callable[Bool]}+{<anon|78364928>}+{Precedence}|48595296) ... }
wtf
----***-----
--------------
--------------
&prefix:<!>
sub prefix:<!> (Mu $) { #`(Sub+{<anon|78364928>}+{Precedence}|48579296) ... }
wtf
----***-----
--------------
--------------
&lc
sub lc (Cool $s) { #`(Sub|54703952) ... }
wtf
----***-----
--------------
--------------
SetHash
(SetHash)
wtf
----***-----
--------------
--------------
Rakudo
(Rakudo)
wtf
----***-----
--------------
--------------
i
0+1i
wtf
----***-----
--------------
--------------
SIGCHLD
SIGCHLD
wtf
----***-----
--------------
0
--------------
--------------
Less
Less
wtf
----***-----
--------------
0
--------------
--------------
&cotan
sub cotan ($) { #`(Sub+{<anon|78364928>}|58028136) ... }
wtf
----***-----
--------------
--------------
&sleep
sub sleep ($seconds = Inf --> Nil) { #`(Sub+{Callable[Nil]}|58741136) ... }
wtf
----***-----
--------------
--------------
&infix:<?^>
sub infix:<?^> (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48586976) ... }
wtf
----***-----
--------------
--------------
&infix:<+^>
sub infix:<+^> (Mu $?, Mu $?) { #`(Sub+{<anon|78364928>}+{Precedence}|48585696) ... }
wtf
----***-----
--------------
--------------
Mix
(Mix)
Invocant requires an instance of type Baggy, but a type object was passed. Did you forget a .new?
in block <unit> at /tmp/iFslCuWrzb line 1
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment