split-python-version ( version -- array )

Vocabulary

build-from-source

Inputs

version

an object

Outputs

array

an object

Definition

USING: arrays combinators kernel sequences splitting ;

IN: build-from-source

: split-python-version ( version -- array )
    {
        {
            [ dup "a" swap subseq? ]
            [ [ "a" split1 "99" or "alpha" swap ] keep 4array ]
        }
        {
            [ dup "b" swap subseq? ]
            [ [ "b" split1 "99" or "beta" swap ] keep 4array ]
        }
        {
            [ dup "rc" swap subseq? ]
            [ [ "rc" split1 "99" or "rc" swap ] keep 4array ]
        }
        [ "z" "99" pick 4array ]
    } cond ;