Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
5
Task/Introspection/Lingo/introspection-1.lingo
Normal file
5
Task/Introspection/Lingo/introspection-1.lingo
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
put _player.productVersion
|
||||
-- "11.5.9"
|
||||
|
||||
_player.itemDelimiter="."
|
||||
if integer(_player.productVersion.item[1])<11 then _player.quit()
|
||||
6
Task/Introspection/Lingo/introspection-2.lingo
Normal file
6
Task/Introspection/Lingo/introspection-2.lingo
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
-- check existance of bloop in local scope
|
||||
bloopExists = not voidP(value("bloop"))
|
||||
-- or for global scope:
|
||||
-- bloopExists = not voidP(_global.bloop)
|
||||
absExists = value("abs(1)")=1
|
||||
if bloopExists and absExists then put abs(bloop) -- or abs(_global.bloop)
|
||||
10
Task/Introspection/Lingo/introspection-3.lingo
Normal file
10
Task/Introspection/Lingo/introspection-3.lingo
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
cnt = 0
|
||||
sum = 0
|
||||
repeat with v in the globals
|
||||
if integerP(v) then
|
||||
cnt = cnt + 1
|
||||
sum = sum + v
|
||||
end if
|
||||
end repeat
|
||||
put cnt
|
||||
put sum
|
||||
Loading…
Add table
Add a link
Reference in a new issue