You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Original bug ID: 1425 Reporter: administrator Status: closed Resolution: fixed Priority: normal Severity: minor Category: ~DO NOT USE (was: OCaml general)
This ml file works with ocamlc p4test.ml, but not with ocamlc -pp camlp4o
p4test.ml. There are three separate bugs.
Have fun,
Chris
------ p4test.ml -------
(* bug 1: reference to a class )
class bar = object method func () = () end
let barr = ref new bar
( uncomment next line to work with -pp camlp4o: )
( let barr = ref (new bar :> bar) *)
let _ = !barr#func ()
(* bug 2: negative 0 as float )
let a = [| 0.0; -0.0 |] ( breaks on -pp camlp4o )
let a = [| 0.0; -.0.0 |] ( works *)
(* bug 3: empty begin end block )
let _ = begin end ( breaks on -pp camlp4o *)
The text was updated successfully, but these errors were encountered:
Original bug ID: 1425
Reporter: administrator
Status: closed
Resolution: fixed
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)
Bug description
Full_Name: Chris Hecker
Version: 3.06
OS: Win2k
Submission from: node-d8e9cca2-sfo-onnet.worldcom.com (216.233.204.162)
This ml file works with ocamlc p4test.ml, but not with ocamlc -pp camlp4o
p4test.ml. There are three separate bugs.
Have fun,
Chris
------ p4test.ml -------
(* bug 1: reference to a class )
class bar = object method func () = () end
let barr = ref new bar
( uncomment next line to work with -pp camlp4o: )
( let barr = ref (new bar :> bar) *)
let _ = !barr#func ()
(* bug 2: negative 0 as float )
let a = [| 0.0; -0.0 |] ( breaks on -pp camlp4o )
let a = [| 0.0; -.0.0 |] ( works *)
(* bug 3: empty begin end block )
let _ = begin end ( breaks on -pp camlp4o *)
The text was updated successfully, but these errors were encountered: