Fix compilation with OCaml 4.13.1
Stephane Glondu
2 years ago
2 | 2 |
Subject: [PATCH] Fix sfx path
|
3 | 3 |
|
4 | 4 |
---
|
5 | |
freetennis.ml | 4 ++--
|
6 | |
1 files changed, 2 insertions(+), 2 deletions(-)
|
|
5 |
freetennis.ml | 4 ++--
|
|
6 |
1 file changed, 2 insertions(+), 2 deletions(-)
|
7 | 7 |
|
8 | 8 |
diff --git a/freetennis.ml b/freetennis.ml
|
9 | 9 |
index cc3042e..75089fa 100644
|
|
22 | 22 |
example of customization: /usr/share/freetennis/gfx *)
|
23 | 23 |
|
24 | 24 |
|
25 | |
--
|
|
0 |
From: Stephane Glondu <steph@glondu.net>
|
|
1 |
Date: Sun, 26 Dec 2021 17:29:38 +0100
|
|
2 |
Subject: Fix compilation with OCaml 4.13.1
|
|
3 |
|
|
4 |
---
|
|
5 |
freetennis.ml | 2 ++
|
|
6 |
1 file changed, 2 insertions(+)
|
|
7 |
|
|
8 |
diff --git a/freetennis.ml b/freetennis.ml
|
|
9 |
index 75089fa..f00ef96 100644
|
|
10 |
--- a/freetennis.ml
|
|
11 |
+++ b/freetennis.ml
|
|
12 |
@@ -40,6 +40,8 @@ let gfxDir = "/usr/share/images/freetennis-common/graphics" (* where the pngs an
|
|
13 |
|
|
14 |
open List
|
|
15 |
|
|
16 |
+let compare = Stdlib.compare
|
|
17 |
+
|
|
18 |
open Sdlevent (* for mme_xrel etc *)
|
|
19 |
|
|
20 |
(* "accumulate l f state" invokes f on each element of l, but
|
0 | 0 |
0001-Fix-sfx-path.patch
|
|
1 |
0002-Fix-compilation-with-OCaml-4.13.1.patch
|