apfl/src/functional-tests/eq.at

40 lines
579 B
Text

===== script =====
print (== 1 1)
print (== 1 1 1)
print (== 1 2)
print (== 1 1 2)
print (== nil false)
print (== false false)
print (== true false)
print (== [] [])
print (== [1] [])
print (== [1] [2])
print (== [1] [1])
print (== [[1]] [[1]])
print (== "Hello" 'Hello)
print (== "Hello" 'World)
print (== ['foo -> [1 2 3]] ['foo -> [1 2 3]])
print (== ['foo -> [1 2 3]] ['foo -> [1 2 4]])
print (== {x -> * x 2} {x -> * x 2})
f = {x -> * x 2}
print (== f f)
===== output =====
true
true
false
false
false
true
false
true
false
false
true
true
true
false
true
false
false
true