: has-three-elements? ( List -- Bool )
    list.length 3 i.=
;

: test-basics ( -- )
    "a b c" " " string.split has-three-elements?
    test.assert

    "a b" " " string.split has-three-elements?
    not test.assert
;
