Initial commit++
This commit is contained in:
parent
5a4851880b
commit
8c366dea82
|
@ -1,3 +1,7 @@
|
||||||
# Mind-Fuck
|
# Mind-Fuck
|
||||||
|
|
||||||
jesus fuck what is this
|
jesus fuck what is this
|
||||||
|
|
||||||
|
## ???-recurse.raku
|
||||||
|
|
||||||
|
How are recursive function calls impacted by dynamic variables?
|
||||||
|
|
19
dyn-recurse.raku
Executable file
19
dyn-recurse.raku
Executable file
|
@ -0,0 +1,19 @@
|
||||||
|
#!/usr/bin/env raku
|
||||||
|
|
||||||
|
use v6.d;
|
||||||
|
|
||||||
|
sub plus-one {
|
||||||
|
$*number++;
|
||||||
|
|
||||||
|
say $*number;
|
||||||
|
|
||||||
|
return if 100 < $*number;
|
||||||
|
|
||||||
|
plus-one;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub MAIN {
|
||||||
|
my Int $*number = 42;
|
||||||
|
|
||||||
|
plus-one;
|
||||||
|
}
|
19
lex-recurse.raku
Executable file
19
lex-recurse.raku
Executable file
|
@ -0,0 +1,19 @@
|
||||||
|
#!/usr/bin/env raku
|
||||||
|
|
||||||
|
use v6.d;
|
||||||
|
|
||||||
|
sub plus-one {
|
||||||
|
$number++;
|
||||||
|
|
||||||
|
say $number;
|
||||||
|
|
||||||
|
return if 100 < $number;
|
||||||
|
|
||||||
|
plus-one;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub MAIN {
|
||||||
|
my Int $number = 42;
|
||||||
|
|
||||||
|
plus-one;
|
||||||
|
}
|
Loading…
Reference in a new issue