Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Ajout du format %i comme spécifié dans la doc. 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2274 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Pierre Weis 1999-02-12 12:34:32 +00:00
parent d5a3eb307b
commit 83fe3134c3
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
stdlib/printf.ml
View File

@ -56,7 +56,7 @@ let fprintf outchan format =
Obj.magic(fun c ->
output_char outchan c;
doprn (succ j))
| 'd' | 'o' | 'x' | 'X' | 'u' ->
| 'd' | 'i' | 'o' | 'x' | 'X' | 'u' ->
Obj.magic(fun n ->
output_string outchan
(format_int (String.sub format i (j-i+1)) n);

2
typing/typecore.ml
View File

@ -322,7 +322,7 @@ let type_format loc fmt =
newty (Tarrow(instance Predef.type_string, scan_format (j+1)))
| 'c' ->
newty (Tarrow(instance Predef.type_char, scan_format (j+1)))
| 'd' | 'o' | 'x' | 'X' | 'u' ->
| 'd' | 'i' | 'o' | 'x' | 'X' | 'u' ->
newty (Tarrow(instance Predef.type_int, scan_format (j+1)))
| 'f' | 'e' | 'E' | 'g' | 'G' ->
newty (Tarrow(instance Predef.type_float, scan_format (j+1)))