mirror of
https://github.com/johnwhitington/cpdf-source.git
synced 2025-02-17 12:20:43 +01:00
more
This commit is contained in:
parent
e887b4d810
commit
c0e818c3a5
@ -126,6 +126,7 @@ let year_day d m y =
|
|||||||
n1 - n2 * n3 + d - 30
|
n1 - n2 * n3 + d - 30
|
||||||
|
|
||||||
let return_date () =
|
let return_date () =
|
||||||
|
match Sys.backend_type with Sys.Other "js_of_ocaml" -> dummy | _ ->
|
||||||
match Sys.os_type with
|
match Sys.os_type with
|
||||||
"Unix" ->
|
"Unix" ->
|
||||||
(* Call the POSIX 'date' program, redirected to a temp file, and parse. *)
|
(* Call the POSIX 'date' program, redirected to a temp file, and parse. *)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user