Data update

This commit is contained in:
Ingy döt Net 2026-04-30 12:34:36 -04:00
parent 4bb20c9b71
commit cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions

View file

@ -0,0 +1,5 @@
Foo := 1;
loop
exit when Foo = 10;
Foo := Foo + 1;
end loop;

View file

@ -0,0 +1,21 @@
if condition
statement
end
# can be written as:
statement if condition # the same with unless
v = begin
expression
rescue
value
end
# can be written as:
v = expression rescue value
begin
statement
ensure
always_run
end
# can be written as:
statement ensure always_run

View file

@ -0,0 +1,22 @@
class ibool
function __construct(b)
assert(type(b) == "boolean", "argument must be a boolean")
self.b = b
end
function iff(cond) return cond ? self.b : not self.b end
end
local itrue = new ibool(true)
local need_umbrella
local raining = true
-- Normal syntax.
if raining then need_umbrella = true end
print($"Is it raining? {raining}. Do I need an umbrella? {need_umbrella}")
-- Inverted syntax.
raining = false
need_umbrella = itrue:iff(raining)
print($"Is it raining? {raining}. Do I need an umbrella? {need_umbrella}")

View file

@ -0,0 +1 @@
if ((Get-Date 5/27/2016).DayOfWeek -eq "Friday") {"Thank God it's Friday!"}

View file

@ -0,0 +1,8 @@
function Action ([scriptblock]$Expression, [Alias("if")][bool]$Test)
{
if ($Test) {&$Expression}
}
Set-Alias -Name say -Value Action
say {"Thank God it's Friday!"} -if (Get-Date 5/27/2016).DayOfWeek -eq "Friday"