Return to input_date.p CVS log

Up to [parser3project] / parser3 / src / www / htdocs

Annotation of parser3/src/www/htdocs/input_date.p, revision 1.1

1.1     ! parser      1: @CLASS
        !             2: input_date
        !             3: 
        !             4: @BASE
        !             5: date
        !             6: 
        !             7: @parse[string][parts]
        !             8: $parts[^string.match[^^(\d{1,2})\.(\d{1,2})\.(\d{2,4})^$]]
        !             9: $parts{
        !            10:        ^if(!^empty[]){$:result[^date:set($3;$2;$1)]}{$:result[^date:set[bad date]]}
        !            11: }