shithub: femtolisp

Info  •  Files  •  Log  •  Branches

fix time.fromstring

--- a/llt/timefuncs.c

+++ b/llt/timefuncs.c

@@ -144,8 +144,12 @@

 #elif defined(__plan9__)

 double parsetime(const char *str)

 {

-    USED(str);

-    return -1;

+    Tm tm;

+

+    if (tmparse(&tm, "?WWW, ?MM ?DD hh:mm:ss ?Z YYYY", str, tzload("local"), nil) == nil)

+        return -1;

+

+    return tmnorm(&tm);

 }

 #else

 // TODO