From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Delivered-To: caml-list@yquem.inria.fr Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by yquem.inria.fr (Postfix) with ESMTP id 17F0CBC48 for ; Wed, 6 Apr 2005 23:54:04 +0200 (CEST) Received: from pauillac.inria.fr (pauillac.inria.fr [128.93.11.35]) by concorde.inria.fr (8.13.0/8.13.0) with ESMTP id j36Ls3Fr006407 for ; Wed, 6 Apr 2005 23:54:03 +0200 Received: from nez-perce.inria.fr (nez-perce.inria.fr [192.93.2.78]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id XAA19237 for ; Wed, 6 Apr 2005 23:54:03 +0200 (MET DST) Received: from qrnik.knm.org.pl (paf87.warszawa.sdi.tpnet.pl [217.96.225.87]) by nez-perce.inria.fr (8.13.0/8.13.0) with ESMTP id j36Ls0Y0019819 (version=TLSv1/SSLv3 cipher=EDH-RSA-DES-CBC3-SHA bits=168 verify=NO) for ; Wed, 6 Apr 2005 23:54:03 +0200 Received: from qrczak by qrnik.knm.org.pl with local (Exim 3.36 #1) id 1DJITH-0006eo-00 for caml-list@inria.fr; Wed, 06 Apr 2005 23:53:59 +0200 To: caml-list@inria.fr Subject: Re: [Caml-list] ambitious proposal: polymorphic arithmetics X-Face: OW>RV&gN+&b-aiNY|U)f=S%w+/rK!);f>/W9IXg})]&F>ht.1Up8@04+_!gOp(_/l_-+E^. 2\vI)1=D,%HWiq)r(M/V~dr^5T^KF/[w5YZ4<0Sus3+O>l3uA/&W_21m?.s,Po8{pb0@ References: <87psx7lszi.fsf@qrnik.zagroda> <38697.131.254.50.45.1112810460.squirrel@mail.irisa.fr> <20050406.151450.98562588.eijiro_sumii@anet.ne.jp> <20050406.163144.51837136.eijiro_sumii@anet.ne.jp> From: "Marcin 'Qrczak' Kowalczyk" Mail-Followup-To: caml-list@inria.fr Date: Wed, 06 Apr 2005 23:53:59 +0200 In-Reply-To: <20050406.163144.51837136.eijiro_sumii@anet.ne.jp> (Eijiro Sumii's message of "Wed, 06 Apr 2005 16:31:44 -0400 (EDT)") Message-ID: <87u0mjvafc.fsf@qrnik.zagroda> User-Agent: Gnus/5.1006 (Gnus v5.10.6) Emacs/21.3 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Sender: "Marcin 'Qrczak' Kowalczyk" X-Miltered: at concorde with ID 42545A7B.001 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Miltered: at nez-perce with ID 42545A78.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Spam: no; 0.00; caml-list:01 eijiro:01 sumii:01 eijiro:01 sumii:01 val:01 zsh:01 ocaml:01 writes:01 polymorphic:01 constructor:01 int:01 segmentation:02 match:02 anet:02 X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on yquem.inria.fr X-Spam-Status: No, score=0.1 required=5.0 tests=FORGED_RCVD_HELO autolearn=disabled version=3.0.2 X-Spam-Level: Eijiro Sumii writes: > # let d = (Obj.magic (Obj.magic B + Obj.magic B) : t) ;; > val d : t = > # (function A -> 78 | B -> 90) d ;; > - : int = 90 > # > ---------------------------------------------------------------------- > > So, it indeed leads to "unknown" values and behaviors, but doesn't > seem to break memory safety (in this case, at least). # type t = A | B | C;; type t = A | B | C # match (Obj.magic (Obj.magic C + Obj.magic C)) with A -> 0 | B -> 1 | C -> 2;; zsh: segmentation fault ocaml -- __("< Marcin Kowalczyk \__/ qrczak@knm.org.pl ^^ http://qrnik.knm.org.pl/~qrczak/