class A
        text=""
        parsed=[str]

list prepareA(int itemCount)=

        mainList=[A]

        for i=1 to itemCount

                ala=new A
                ala.text=toStr(i)+" Alice in wonderland"
                append(mainList,ala)

        return mainList

proc test(A ala)=
        printNL(ala.text)
        ala.parsed=split(ala.text)

#-------------------------------------------------

mainList=[A]

mainList=prepareA(10)

for e in mainList parallel #!!!!!!!!!!!!!!!!
        test(e)

#------------------------------------------------