Add tasks for all the new languages

This commit is contained in:
Tina Müller 2016-12-05 23:44:36 +01:00
parent 9dc3c2bb62
commit bba7bfd280
13208 changed files with 134745 additions and 0 deletions

View file

@ -0,0 +1,2 @@
clr bit ; clears
setb bit ; sets

View file

@ -0,0 +1,4 @@
(not #t) → #f
(not #f) → #t
(not null) → #f
(not 0) → #f

View file

@ -0,0 +1,14 @@
' FB 1.05.0 Win64
Dim i As Integer = 23
Dim s As String = "False"
Dim b As Boolean
b = i
Print b
b = CBool(s)
Print b
i = b
Print i
i = CInt(true)
Print i
Sleep

View file

@ -0,0 +1,14 @@
software {
if true
print("this prints")
end
if 1
print("this prints")
end
if false
print("this does not print")
end
if 0
print("this does not print")
end
}

View file

@ -0,0 +1,9 @@
Idris> :doc Bool
Data type Prelude.Bool.Bool : Type
Boolean Data Type
Constructors:
False : Bool
True : Bool

View file

@ -0,0 +1,8 @@
> 'true
true
> 'false
false
> (or 'false 'false)
false
> (or 'false 'true)
true

View file

@ -0,0 +1,11 @@
!true
// => false
not false
// => true
var(x = true)
$x // => true
$x = false
$x // => false

View file

@ -0,0 +1,7 @@
local(x = string)
// size is 0
#x->size ? 'yes' | 'no'
local(x = '123fsfsd')
// size is 8
#x->size ? 'yes' | 'no'

View file

@ -0,0 +1,6 @@
put TRUE
-- 1
put FALSE
-- 0
if 23 then put "Hello"
-- "Hello"

View file

@ -0,0 +1,4 @@
def example(input :boolean):
if input:
return "Input was true!"
return "Input was false."

View file

@ -0,0 +1,5 @@
if true: echo "yes"
if false: echo "no"
# Other objects never represent true or false:
if 2: echo "compile error"

View file

@ -0,0 +1,5 @@
x = True
y = False
see "x and y : " + (x and y) + nl
see "x or y : " + (x or y) + nl
see "not x : " + (not x) + nl

View file

@ -0,0 +1,2 @@
var t = true;
var f = false;

View file

@ -0,0 +1,5 @@
if (0 || "0" || false || nil || "" || [] || :()) {
say "true"
} else {
say "false";
}

View file

@ -0,0 +1 @@
decl boolean bool

View file

@ -0,0 +1,3 @@
set bool true
# same as
set bool (= 2 2)

View file

@ -0,0 +1,3 @@
set bool false
# same as
set bool (not (= 2 2))