<div dir="ltr">nothing blocking adding the primops right now from a technical standpoint (though it'd be too late for the 7.8 merge window).<div>The main blocker is i'm moving over the next month + I'm amidst sorting transitioning from consulting to some other work. (life and all).</div>

<div><br></div><div>i want to also add the inline  primops to the native code gen  and -fvia-c in tandem with baking in the LLVM support. Which will take a teeny bit of extra work, but really very much worth it I think.</div>

<div><br></div><div>Glad you agree about the constructors being handy! Should make is possible to have the CAS vector stuff working as a selfcontained experiment that just works ™ with current vector. </div></div><div class="gmail_extra">

<br><br><div class="gmail_quote">On Thu, Nov 21, 2013 at 2:05 PM, Ryan Newton <span dir="ltr"><<a href="mailto:rrnewton@gmail.com" target="_blank">rrnewton@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

<div dir="ltr">I'm not sure why this would be a ticket, because it's not really a bug or an issue with GHC.  But I did go ahead and write up the state of affairs in a Haskell wiki page here:<div><div><br></div><div>



    <a href="http://www.haskell.org/haskellwiki/AtomicMemoryOps" target="_blank">http://www.haskell.org/haskellwiki/AtomicMemoryOps</a><br></div><div><br></div><div>There's just a fundamental impedance mismatch between having a lazy/pure world where pointer equality is meaningless, and operations based on pointer-equality like CAS.  I think we've papered over that as best we could with the "Ticketed" interface describe in that wiki, but I don't think there's anything else I could have asked of GHC to make this any easier.</div>



<div><br></div><div>But as you know there are several improvements that can be made to make what we've got better.  Are you blocked on anything wrt to adding direct LLVM support for the primops in question?</div></div>



<div><br></div><div class="gmail_extra"><div class="gmail_quote"><div class="im">On Wed, Nov 20, 2013 at 4:38 PM, Carter Schonwald <span dir="ltr"><<a href="mailto:carter.schonwald@gmail.com" target="_blank">carter.schonwald@gmail.com</a>></span> wrote:<br>



<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr"><div><div>I though Vector instances had their constructors exported so that you can get at the underlying Primitive vectors, and and Primitive vectors have a bytearray underneath! </div>



</div><div class="gmail_extra">I don't understand why Vector/MVector needs to be changed here to support that info.<br></div><div class="gmail_extra">For the Atomic operations, it seems like you just really want to only support the operations on vector types directly expressable with Primitive vectors. Perhaps i'm not understanding though.<br>



</div></div></blockquote><div><br></div></div><div>As far as I can see if the user gives you a "Data.Vector.Unboxed.MVector s Int8", what you're getting is the result of this type function:</div><div><br></div>

<div>

<div>   newtype instance MVector s Int8 = MV_Int8 (P.MVector s Int8)</div></div><div><br></div><div>.. from Unboxed.Base.hs.  The only thing that's provided for "MVector s a" types generally are instances of the Vector/MVector classes, which don't say how to get the pointer(s).</div>



<div><br></div><div>BUT... you make a good point about the constructors (e.g. MV_Int8) being exposed!  It seems like we CAN make our own type family that mirrors the MVector one, and which leverages <i>each</i> of those "newtype instance" equations, matching on an MV_Int8 and grabbing the underlying Primitive vector... Nice!<br>



</div><div class="im"><div> <br></div><div><br></div><div><br></div><div><br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">



<div dir="ltr"><div><div><div class="gmail_extra"><div class="gmail_quote">On Wed, Nov 20, 2013 at 10:57 AM, Ryan Newton <span dir="ltr"><<a href="mailto:rrnewton@gmail.com" target="_blank">rrnewton@gmail.com</a>></span> wrote:<br>







<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr">We do expose CAS for boxed data, and we depend on that for various concurrent data structures (e.g. Michael-scott queues).<div>







<br></div><div>But it's a messy business:</div><div><br></div><div><explanation> You have to fight hard against the GHC optimizer to prevent it from performing optimizations (e.g. unbox and rebox an Int) that completely destroy pointer equality (in all runs of the program).  The way that we've codified our solution to this is to use abstract "Ticket"s (based on the Any kind) that GHC is not supposed to be able to see through.  These are used to abstractly represent old reads when you come back to do a new CAS operation:</div>









<div><br></div><div>    <a href="http://hackage.haskell.org/package/atomic-primops-0.4/docs/Data-Atomics.html#g:2" target="_blank">http://hackage.haskell.org/package/atomic-primops-0.4/docs/Data-Atomics.html#g:2</a><br></div>







<div><br></div>

<div>Even then, there was a bunch of careful NOINLINE's and other business necessary to achieve something workable, and it's highly GHC specific.  If we were to expose CAS on boxed "Data.Vector", I think it would only make sense as the ticketed interface above (raw CAS is useless, and will just condemn others to the same problems we had).</div>









<div></explanation></div><div><br></div><div>As a result of all this the CAS for Data.Vector would have a different signature (unless we wanted to force Storable/Unbox to use Tickets), and thus couldn't go in the "MVector" type class along with all the other basic operations that are uniform across representations.   </div>









<div><br></div><div>That said, it's easy to provide CAS from a separate "vector-atomics" package, because Data.Vector exposes the MVector constructor that lets you get at the underlying MutableArray.  So we certainly can provide the functionality somewhere, somehow.</div>







<span><font color="#888888">

<div><br></div><div>  -Ryan<br></div><div><br></div></font></span></div><div><div><div class="gmail_extra"><br><br><div class="gmail_quote">On Wed, Nov 20, 2013 at 10:21 AM, Jan-Willem Maessen <span dir="ltr"><<a href="mailto:jmaessen@alum.mit.edu" target="_blank">jmaessen@alum.mit.edu</a>></span> wrote:<br>









<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr"><div>On Wed, Nov 20, 2013 at 10:06 AM, Ryan Newton <span dir="ltr"><<a href="mailto:rrnewton@gmail.com" target="_blank">rrnewton@gmail.com</a>></span> wrote:<br>









</div><div class="gmail_extra"><div class="gmail_quote"><div>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr"><div>(3) The most invasive (but best for the user) change would be to extend the basic MVector interface to include notions of concurrency-related operations right inside the vector package (CAS, etc).  But they should still probably go in a separate class (not class MVector), just because they will be specific to Unboxed and Storable vectors rather than boxed ones....</div>










</div></blockquote><div><br></div></div><div>Any reason we shouldn't be able to CAS on boxed vectors?  Every architecture supports a pointer-sized CAS.  What "equality" means for CAS, of course, has to be rather carefully defined, but that's equally true for the unboxed types.</div>










<div><br></div><div>-Jan</div><div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr">



<span><font color="#888888">

<div><br></div><div>  -Ryan</div><div><br></div></font></span></div>
<br>_______________________________________________<br>
Libraries mailing list<br>
<a href="mailto:Libraries@haskell.org" target="_blank">Libraries@haskell.org</a><br>
<a href="http://www.haskell.org/mailman/listinfo/libraries" target="_blank">http://www.haskell.org/mailman/listinfo/libraries</a><br>
<br></blockquote></div><br></div></div>
</blockquote></div><br></div>
</div></div><br>_______________________________________________<br>
Libraries mailing list<br>
<a href="mailto:Libraries@haskell.org" target="_blank">Libraries@haskell.org</a><br>
<a href="http://www.haskell.org/mailman/listinfo/libraries" target="_blank">http://www.haskell.org/mailman/listinfo/libraries</a><br>
<br></blockquote></div><br></div></div></div></div>
</blockquote></div></div><br></div></div>
</blockquote></div><br></div>