Revision 34 Version 10

From readme.txt 

1. Some fixes for using => immediate on a group as a result from a function

eg. Print FunctionReturnGroup()=>GroupMember

see module rev34ver10 in info file

2. New modules in info.gsb file

FUNNY, RECSOUND, REV34VER10

3. DD6 module in info file fixed.

4. Most modules in info checked again.

Module REV34VER10 in info.gsb:

module testA {
    Print @FunctionReturnGroup()=>Name()=>v$()="Ok"
    Print @FunctionReturnGroup()=>Name()=>val()=1234
    Print @FunctionReturnGroup()=>Name()=>prop=500
    Print @FunctionReturnGroup()=>Name()=>strProp$="yes"
    Print @FunctionReturnGroup()=>Name()=>strProp.key=1000
    function FunctionReturnGroup()
        local Z=random(1, 500)
        local group a {
            Property GroupMember {value}=Z
            Function Name {
                GROUP alfa {
                    function v$ {="Ok"}
                    function val {=1234}
                    property prop {value}=500
                    property strProp$ {value}="yes"
                    group strProp {
                        key=1000
                    }
                }
                =alfa
            }
        }
        =a
    end function
}
module testB {
    function FunctionReturnGroup() {
        Z=random(1, 500)
        group a {
            Property GroupMember {value}=Z
            Function Name {
                GROUP alfa {
                    function v$ {="Ok"}
                    function val {=1234}
                    property prop {value}=500
                    property strProp$ {value}="yes"
                    group strProp {
                        key=1000
                    }
                }
                =alfa
            }
        }
        =a
    }
    Print FunctionReturnGroup()=>Name()=>v$()="Ok"
    Print FunctionReturnGroup()=>Name()=>val()=1234
    Print FunctionReturnGroup()=>Name()=>prop=500
    Print FunctionReturnGroup()=>Name()=>strProp$="yes"
    Print FunctionReturnGroup()=>Name()=>strProp.key=1000
}
module testC {
    function FunctionReturnGroup() {
        Z=random(1, 500)
        group a {
            Property GroupMember {value}=Z
            Function Name {
                GROUP alfa {
                    function v$ {="Ok"}
                    function val {=1234}
                    property prop {value}=500
                    property strProp$ {value}="yes"
                    group strProp {
                        key=1000
                    }
                }
                =alfa
            }
        }
        =a
    }
    KK=FunctionReturnGroup()
    for kk {
         Print .Name()=>v$()="Ok"
         Print .Name()=>val()=1234
         Print .Name()=>prop=500
         Print .Name()=>strProp$="yes"
         Print .Name()=>strProp.key=1000
    }
    LL=FunctionReturnGroup()=>Name()
    for LL {
         Print .v$()="Ok"
         Print .val()=1234
         Print .prop=500
         Print .strProp$="yes"
         Print .strProp.key=1000
    }
}
module testD {
    KK=@FunctionReturnGroup()
    for kk {
         Print .Name()=>v$()="Ok"
         Print .Name()=>val()=1234
         Print .Name()=>prop=500
         Print .Name()=>strProp$="yes"
         Print .Name()=>strProp.key=1000
    }
    LL=@FunctionReturnGroup()=>Name()
    for LL {
         Print .v$()="Ok"
         Print .val()=1234
         Print .prop=500
         Print .strProp$="yes"
         Print .strProp.key=1000
    }
    function FunctionReturnGroup()
        local Z=random(1, 500)
        local group a {
            Property GroupMember {value}=Z
            Function Name {
                GROUP alfa {
                    function v$ {="Ok"}
                    function val {=1234}
                    property prop {value}=500
                    property strProp$ {value}="yes"
                    group strProp {
                        key=1000
                    }
                }
                =alfa
            }
        }
        =a
    end function
    
}
testA
testB
testC
testD