construct-float ( str -- x )

Vocabulary

yaml.conversion

Inputs

str

an object

Outputs

x

an object

Definition

USING: combinators kernel math.parser regexp ;

IN: yaml.conversion

: construct-float ( str -- x )
    {
        { [ dup re-infinity matches? ] [ construct-infinity ] }
        { [ dup re-nan matches? ] [ drop 1/0. ] }
        [ string>number ]
    } cond ;