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,38 @@
function range beginning ending stepping
local tRange, tBegin, tEnd, tstep
if stepping is empty or stepping is 0 then
put 1 into tstep
else
put abs(stepping) into tstep
end if
if ending is empty or isNumber(ending) is not true then
put 0 into tEnd
else
put ending into tEnd
end if
if beginning is empty or isNumber(beginning) is not true then
put 0 into tBegin
else
put beginning into tBegin
end if
repeat with r = tBegin to tEnd step tstep
put space & r after tRange
end repeat
return word 1 to -1 of tRange
end range
function expandRange rangeExpr
put rangeExpr into tRange
split tRange by comma
repeat with n = 1 to the number of elements of tRange
if matchText(tRange[n],"^(\-*\d+)\-(\-*\d+)",beginning, ending) then
put range(beginning, ending, 1) & space after z
else
put tRange[n] & space after z
end if
end repeat
return z
end expandRange

View file

@ -0,0 +1,2 @@
expandRange("-6,-3--1,3-5,7-11,14,15,17-20")
-6 -3 -2 -1 3 4 5 7 8 9 10 11 14 15 17 18 19 20