You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
32 lines
1.5 KiB
32 lines
1.5 KiB
# --- ROCK-COPYRIGHT-NOTE-BEGIN ---
|
|
#
|
|
# This copyright note is auto-generated by ./scripts/Create-CopyPatch.
|
|
# Please add additional copyright information _after_ the line containing
|
|
# the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by
|
|
# the ./scripts/Create-CopyPatch script. Do not edit this copyright text!
|
|
#
|
|
# ROCK Linux: rock-src/package/nikolaus/unison/newer-ocaml-names.patch
|
|
# ROCK Linux is Copyright (C) 1998 - 2006 Clifford Wolf
|
|
#
|
|
# This patch file is dual-licensed. It is available under the license the
|
|
# patched project is licensed under, as long as it is an OpenSource license
|
|
# as defined at http://www.opensource.org/ (e.g. BSD, X11) or under the terms
|
|
# of the GNU General Public License as published by the Free Software
|
|
# Foundation; either version 2 of the License, or (at your option) any later
|
|
# version.
|
|
#
|
|
# --- ROCK-COPYRIGHT-NOTE-END ---
|
|
|
|
--- ./ubase/uprintf.ml.orig 2004-09-15 23:48:34.495893484 +0200
|
|
+++ ./ubase/uprintf.ml 2004-09-15 23:54:25.937505754 +0200
|
|
@@ -10,8 +10,8 @@
|
|
(* *)
|
|
(***********************************************************************)
|
|
|
|
-external format_int: string -> int -> string = "format_int"
|
|
-external format_float: string -> float -> string = "format_float"
|
|
+external format_int: string -> int -> string = "caml_format_int"
|
|
+external format_float: string -> float -> string = "caml_format_float"
|
|
|
|
let fprintf outchan doafter format =
|
|
let format = (Obj.magic format : string) in
|