Re: Bitarray and Bin_prot
"Ackerley Tng [email protected] [ocaml_beginners]" <[email protected]> Fri, 17 Mar 2017 11:27:31 +0000
| Newsgroups | gmane.comp.lang.ocaml.beginners |
|---|---|
| Message-ID | <CANZnma4eNo1O7b7CbyZn3r0TbexHE1b8mNH-s3Fck+3TFeHFFw@mail.gmail.com> |
--001a114060524185a9054aeb77fc Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable Thanks! I looked in Bitarray, and saw that the issue was that one of the internal types didn't have [@@deriving bin_io] next to it, though all the subtypes are actually Binable. I can't just include Bitarray because that doesn't allow me to change the type in there. As a workaround, I copied all of Bitarray's code into my module (effectively reimplementing Bitarray) although that isn't satisfactory... On Fri, Mar 17, 2017 at 4:57 PM Kenneth Miller [email protected] [ocaml_beginners] <[email protected]> wrote: > > > bin_prot is a generative code produce in that it is written to > programmatically explore the expression tree in order to apply known > operations on each primitive type, and compose them with the higher level > types that ocaml has to offer. So, int, string, float, ect have default > implementations, and other types are composed out of those such as record > have a way of generating serialization code that applies these generated > functions to the respective record/tuple by type in the right order. > > If bitarray is not binnable, that is because the bin_prot requires some > interface to be satisfied. You might look into the bit array type > definition on whatever project source provides it in order to see if you > can yank just that out in a raw ocaml instance (with bin_prot) and see if > salting with bin_prot it directly yields any information about what is > required. As far as writing your own module extending bitarray, you can > either do module bitarray =3D struct include Bitarray <required binnable > implementations here> end > > > On Thursday, March 16, 2017, 11:11:57 PM EDT, Ackerley Tng > [email protected] [ocaml_beginners] <[email protected]> > wrote: > > > Hi! > > I was trying to write a binary representation of bitarray using bin_prot, > but I realized a Bitarray is not binable. > > Any tips on how to make it binable? > > I guess one option is to extend bitarray by declaring my own module, > including bitarray, but then how would i fill in even one of the required > functions? > > The bin_prot code has a lot of macro looking stuff, if you could point me > in the right direction on how to understand the macro stuff and which par= t > of bin_prot is actually doing the real work of converting the data > structure to binary form, it'd be great! > > Thanks! > > >=20 > --001a114060524185a9054aeb77fc Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/htm= l4/strict.dtd"> <html> <head> </head> =20 <body style=3D"background-color: #fff;"> <span style=3D"display:none"> </span> <!--~-|**|PrettyHtmlStartT|**|-~--> <div id=3D"ygrp-mlmsg" style=3D"position:relative;"> <div id=3D"ygrp-msg" style=3D"z-index: 1;"> <!--~-|**|PrettyHtmlEndT|**|-~--> <div id=3D"ygrp-text" > =20=20=20=20=20=20 =20=20=20=20=20=20 <p><div dir=3D"ltr">Thanks! I looked in Bitarray, and saw that the is= sue was that one of the internal types didn't have [@@deriving bin_io] = next to it, though all the subtypes are actually Binable.<div><br></div><di= v>I can't just include Bitarray because that doesn't allow me to ch= ange the type in there.</div><div><br></div><div>As a workaround, I copied = all of Bitarray's code into my module (effectively reimplementing Bitar= ray) although that isn't satisfactory...</div></div><br><div class=3D"g= mail_quote"><div dir=3D"ltr">On Fri, Mar 17, 2017 at 4:57 PM Kenneth Miller= <a href=3D"mailto:[email protected]">[email protected]= </a> [ocaml_beginners] <<a href=3D"mailto:[email protected]= m">[email protected]</a>> wrote:<br></div><blockquote clas= s=3D"gmail_quote" style=3D"border-left:1px #ccc solid;"> <u class=3D"gmail_msg"></u> =20 <div style=3D"background-color:#fff;" class=3D"gmail_msg"> <span class=3D"gmail_msg">=C2=A0</span> <div id=3D"m_-7382645069658830543ygrp-mlmsg" class=3D"gmail_msg"> <div id=3D"m_-7382645069658830543ygrp-msg" class=3D"gmail_msg"> <div id=3D"m_-7382645069658830543ygrp-text" class=3D"gmail_msg"> =20=20=20=20=20=20 =20=20=20=20=20=20 <p class=3D"gmail_msg"><div style=3D"font-family:Helvetica Neue,Helve= tica,Arial,sans-serif;font-size:medium;" class=3D"gmail_msg"><div class=3D"= gmail_msg"><div class=3D"gmail_msg">bin_prot is a generative code produce i= n that it is written to programmatically explore the expression tree in ord= er to apply known operations on each primitive type, and compose them with = the higher level types that ocaml has to offer. So, int, string, float, ect= have default implementations, and other types are composed out of those su= ch as record have a way of generating serialization code that applies these= generated functions to the respective record/tuple by type in the right or= der.=C2=A0</div></div><div class=3D"gmail_msg"><br class=3D"gmail_msg"></di= v><div class=3D"gmail_msg">If bitarray is not binnable, that is because the= bin_prot requires some interface to be satisfied. You might look into the = bit array type definition on whatever project source provides it in order t= o see if you can yank just that out in a raw ocaml instance (with bin_prot)= and see if salting with bin_prot it directly yields any information about = what is required. As far as writing your own module extending bitarray, you= can either do module bitarray =3D struct include Bitarray <required bin= nable implementations here> end</div></div></p></div></div></div></div><= div style=3D"background-color:#fff;" class=3D"gmail_msg"><div id=3D"m_-7382= 645069658830543ygrp-mlmsg" class=3D"gmail_msg"><div id=3D"m_-73826450696588= 30543ygrp-msg" class=3D"gmail_msg"><div id=3D"m_-7382645069658830543ygrp-te= xt" class=3D"gmail_msg"><p class=3D"gmail_msg"><div style=3D"font-family:He= lvetica Neue,Helvetica,Arial,sans-serif;font-size:medium;" class=3D"gmail_m= sg"><div class=3D"gmail_msg"><br class=3D"gmail_msg"></div><div id=3D"m_-73= 82645069658830543yahoo_quoted_0414726696" class=3D"m_-7382645069658830543ya= hoo_quoted gmail_msg"><div class=3D"gmail_msg">On Thursday, March 16, 2017,= 11:11:57 PM EDT, Ackerley Tng <a href=3D"mailto:[email protected]" cla= ss=3D"gmail_msg" target=3D"_blank">[email protected]</a> [ocaml_beginne= rs] <<a href=3D"mailto:[email protected]" class=3D"gmail_m= sg" target=3D"_blank">[email protected]</a>> wrote:</div><= div class=3D"gmail_msg"><div id=3D"m_-7382645069658830543yiv7846580645" cla= ss=3D"gmail_msg"><div class=3D"gmail_msg"> <span class=3D"gmail_msg">=C2=A0</span> <div id=3D"m_-7382645069658830543yiv7846580645ygrp-mlmsg" class=3D"gmail_ms= g"> <div id=3D"m_-7382645069658830543yiv7846580645ygrp-msg" class=3D"gmail_ms= g"> <div id=3D"m_-7382645069658830543yiv7846580645ygrp-text" class=3D"gmail= _msg"> =20=20=20=20=20=20 =20=20=20=20=20=20 <p class=3D"gmail_msg"></p><div dir=3D"ltr" class=3D"gmail_msg">Hi!= =C2=A0<div class=3D"gmail_msg"><br clear=3D"none" class=3D"gmail_msg"></div= ><div class=3D"gmail_msg">I was trying to write a binary representation of = bitarray using bin_prot, but I realized a Bitarray is not binable.=C2=A0</d= iv><div class=3D"gmail_msg"><br clear=3D"none" class=3D"gmail_msg"></div><d= iv class=3D"gmail_msg">Any tips on how to make it binable?=C2=A0</div><div = class=3D"gmail_msg"><br clear=3D"none" class=3D"gmail_msg"></div><div class= =3D"gmail_msg">I guess one option is to extend bitarray by declaring my own= module, including bitarray, but then how would i fill in even one of the r= equired functions?</div><div class=3D"gmail_msg"><br clear=3D"none" class= =3D"gmail_msg"></div><div class=3D"gmail_msg">The bin_prot code has a lot o= f macro looking stuff, if you could point me in the right direction on how = to understand the macro stuff and which part of bin_prot is actually doing = the real work of converting the data structure to binary form, it'd be = great!</div><div class=3D"gmail_msg"><br clear=3D"none" class=3D"gmail_msg"= ></div><div class=3D"gmail_msg">Thanks!</div><div class=3D"gmail_msg"><br c= lear=3D"none" class=3D"gmail_msg"></div><div class=3D"gmail_msg"><br clear= =3D"none" class=3D"gmail_msg"></div></div> </div> =20=20=20=20=20 =20=20=20=20 <div style=3D"color:#fff;height:0;" class=3D"gmail_msg"></div></div> </div></div></div></div></div></div></p></div></div></div></div><div style= =3D"background-color:#fff;" class=3D"gmail_msg"><div id=3D"m_-7382645069658= 830543ygrp-mlmsg" class=3D"gmail_msg"><div id=3D"m_-7382645069658830543ygrp= -msg" class=3D"gmail_msg"><div id=3D"m_-7382645069658830543ygrp-text" class= =3D"gmail_msg"><p class=3D"gmail_msg"><div style=3D"font-family:Helvetica N= eue,Helvetica,Arial,sans-serif;font-size:medium;" class=3D"gmail_msg"></div= ></p> </div> =20=20=20=20=20 =20=20=20=20 <div style=3D"color:#fff;height:0;" class=3D"gmail_msg"></div> </div> =20=20 </div></div></blockquote></div> </p> </div> =20=20=20=20=20 <!--~-|**|PrettyHtmlStart|**|-~--> <div style=3D"color: #fff; height: 0;">__._,_.___</div> =20=20=20=20=20=20=20=20=20=20 =20=20 =20 =20=20=20=20 <div style=3D"clear:both"> </div> <div id=3D"fromDMARC" style=3D"margin-top: 10px;"> <hr style=3D"height:2px ; border-width:0; color:#E3E3E3; background= -color:#E3E3E3;"> Posted by: Ackerley Tng <[email protected]> <hr st= yle=3D"height:2px ; border-width:0; color:#E3E3E3; background-color:#E3E3E3= ;"> </div> <div style=3D"clear:both"> </div> <table cellspacing=3D4px style=3D"margin-top: 10px; margin-bottom: 10px= ; color: #2D50FD;"> <tbody> <tr> <td style=3D"font-size: 12px; font-family: arial; font-weight: bo= ld; padding: 7px 5px 5px;" > <a style=3D"text-decoration: none; color: #2D50FD= " href=3D"https://groups.yahoo.com/neo/groups/ocaml_beginners/conversations= /messages/14788;_ylc=3DX3oDMTJxanI1aGtlBF9TAzk3MzU5NzE0BGdycElkAzQ5OTkxOTQE= Z3Jwc3BJZAMxNzA1MDA2NzY0BG1zZ0lkAzE0Nzg4BHNlYwNmdHIEc2xrA3JwbHkEc3RpbWUDMTQ= 4OTc1MTM3NA--?act=3Dreply&messageNum=3D14788">Reply via web post</a> </td> <td>•</td> <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p= x 5px;" > <a href=3D"mailto:[email protected]?subject=3DRe%3A%20%22oc= aml_beginners%22%3A%3A%5B%5D%20Bitarray%20and%20Bin_prot" style=3D"text-dec= oration: none; color: #2D50FD;"> Reply to sender </a> </td> <td>•</td> <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p= x 5px;"> <a href=3D"mailto:[email protected]?subject=3DRe%= 3A%20%22ocaml_beginners%22%3A%3A%5B%5D%20Bitarray%20and%20Bin_prot" style= =3D"text-decoration: none; color: #2D50FD"> Reply to group </a> </td> <td>•</td> <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p= x 5px;" > <a href=3D"https://groups.yahoo.com/neo/groups/ocaml_beginners/= conversations/newtopic;_ylc=3DX3oDMTJlM2FzbjMwBF9TAzk3MzU5NzE0BGdycElkAzQ5O= TkxOTQEZ3Jwc3BJZAMxNzA1MDA2NzY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTQ4OTc1MTM3= NA--" style=3D"text-decoration: none; color: #2D50FD">Start a New Topic</a> </td> <td>•</td> <td style=3D"font-size: 12px; font-family: arial; padding: 7px 5p= x 5px;color: #2D50FD;" > <a href=3D"https://groups.yahoo.com/neo/groups/= ocaml_beginners/conversations/topics/14784;_ylc=3DX3oDMTM2Y2UxcG1vBF9TAzk3M= zU5NzE0BGdycElkAzQ5OTkxOTQEZ3Jwc3BJZAMxNzA1MDA2NzY0BG1zZ0lkAzE0Nzg4BHNlYwNm= dHIEc2xrA3Z0cGMEc3RpbWUDMTQ4OTc1MTM3NAR0cGNJZAMxNDc4NA--" style=3D"text-dec= oration: none; color: #2D50FD;">Messages in this topic</a> (3) </td> </tr> </tbody> </table> =20=20=20=20=20=20=20=20 <div id=3D"megaphoneModule"> <hr style=3D"height:2px ; border-width:0; color:#E3E3E3; backgr= ound-color:#E3E3E3;"> <div> <div class=3D"stream" style=3D"margin-bottom:10px;"> <div style=3D"background-color:white;"> <div class=3D"sn-img" style=3D"display:inline;"><img name=3D"tn= _file" style=3D"padding:0px 10px;vertical-align:top;margin-top:5px;" src=3D= "https://s.yimg.com/ru/static/images/yg/img/megaphone/1464031581_phpFA8bON"= height=3D"82" width=3D"82"></div> <div class=3D"mod-txt" style=3D"display:inline-block;"> <a rel=3D"nofollow" name=3D"sub_url" target=3D"_blank" href= =3D"https://yho.com/1wwmgg" style=3D"color:#0000FF;display:block;margin-lef= t:5px;text-decoration:none;"><span style=3D"font-size:15px;">Have you tried= the highest rated email app?</span></a> <div style=3D"max-width:530px;padding:2px 5px;">With 4.5 st= ars in iTunes, the Yahoo Mail app is the highest rated email app on the mar= ket. What are you waiting for? Now you can access all your inboxes (Gmail, = Outlook, AOL and more) in one place. Never delete an email again with 1000G= B of free cloud storage.</div> </div> </div> </div> </div>=20=20 =20=20=20=20=20 <hr style=3D"height:2px ; border-width:0; color:#E3E3E3; background-col= or:#E3E3E3;"> </div> <!------- Start Nav Bar ------> <div id=3D"ygrp-grfd" style=3D"font-family: Verdana; font-size: 12px; p= adding: 15px 0;"> =20=20=20=20=20=20 <!-- |**|begin egp html banner|**| --> Archives up to December 31, 2011 are also downloadable at <a href=3D"= http://www.connettivo.net/cntprojects/ocaml_beginners">http://www.connettiv= o.net/cntprojects/ocaml_beginners</a><BR> The archives of the very official ocaml list (the seniors' one) can be foun= d at <a href=3D"http://caml.inria.fr">http://caml.inria.fr</a><BR> Attachments are banned and you're asked to be polite, avoid flames etc. = =20=20 <!-- |**|end egp html banner|**| --> </div> =20=20 =20 <!-- |**|begin egp html banner|**| --> <div id=3D"ygrp-vital" style=3D"background-color: #f2f2f2; font-family: Ver= dana; font-size: 10px; margin-bottom: 10px; padding: 10px;"> <span id=3D"vithd" style=3D"font-weight: bold; color: #333; text-transf= orm: uppercase; "><a href=3D"https://groups.yahoo.com/neo/groups/ocaml_begi= nners/info;_ylc=3DX3oDMTJlcGxndmtqBF9TAzk3MzU5NzE0BGdycElkAzQ5OTkxOTQEZ3Jwc= 3BJZAMxNzA1MDA2NzY0BHNlYwN2dGwEc2xrA3ZnaHAEc3RpbWUDMTQ4OTc1MTM3NA--" style= =3D"text-decoration: none;">Visit Your Group</a></span> <ul style=3D"list-style-type: none; margin: 0; padding: 0; display: in= line;"> </ul> </div> <div id=3D"ft" style=3D"font-family: Arial; font-size: 11px; margin-top: 5p= x; padding: 0 2px 0 0; clear: both;"> <a href=3D"https://groups.yahoo.com/neo;_ylc=3DX3oDMTJkZnNlNXJvBF9TAzk3ND= c2NTkwBGdycElkAzQ5OTkxOTQEZ3Jwc3BJZAMxNzA1MDA2NzY0BHNlYwNmdHIEc2xrA2dmcARzd= GltZQMxNDg5NzUxMzc0" style=3D"float: left;"><img src=3D"http://l.yimg.com/r= u/static/images/yg/img/email/new_logo/logo-groups-137x15.png" height=3D"15"= width=3D"137" alt=3D"Yahoo! Groups" style=3D"border: 0;"/></a> <div style=3D"color: #747575; float: right;"> • <a href=3D"https://i= nfo.yahoo.com/privacy/us/yahoo/groups/details.html" style=3D"text-decoratio= n: none;">Privacy</a> • <a href=3D"mailto:ocaml_beginners-unsubscribe@= yahoogroups.com?subject=3DUnsubscribe" style=3D"text-decoration: none;">Uns= ubscribe</a> • <a href=3D"https://info.yahoo.com/legal/us/yahoo/utos/t= erms/" style=3D"text-decoration: none;">Terms of Use</a> </div> </div> <br> <!-- |**|end egp html banner|**| --> </div> <!-- ygrp-msg --> =20 <!-- Sponsor --> <!-- |**|begin egp html banner|**| --> <div id=3D"ygrp-sponsor" style=3D"width:160px; float:right; clear:none; m= argin:0 0 25px 0; background: #fff;"> <!-- Start Recommendations --> <div id=3D"ygrp-reco"> </div> <!-- End Recommendations --> </div> <!-- |**|end egp html banner|**| --> <div style=3D"clear:both; color: #FFF; font-size:1px;">.</div> </div> <img src=3D"http://geo.yahoo.com/serv?s=3D97359714/grpId=3D4999194/grpspI= d=3D1705006764/msgId=3D14788/stime=3D1489751374" width=3D"1" height=3D"1"> = <br> <img src=3D"http://y.analytics.yahoo.com/fpc.pl?ywarid=3D515FB27823A7407E&a= =3D10001310322279&js=3Dno&resp=3Dimg&cf12=3DCP" width=3D"1" height=3D"1">=20 <div style=3D"color: #fff; height: 0;">__,_._,___</div> <!--~-|**|PrettyHtmlEnd|**|-~--> </body> <!--~-|**|PrettyHtmlStart|**|-~--> <head> <style type=3D"text/css"> <!-- #ygrp-mkp { border: 1px solid #d8d8d8; font-family: Arial; margin: 10px 0; padding: 0 10px; } #ygrp-mkp hr { border: 1px solid #d8d8d8; } #ygrp-mkp #hd { color: #628c2a; font-size: 85%; font-weight: 700; line-height: 122%; margin: 10px 0; } #ygrp-mkp #ads { margin-bottom: 10px; } #ygrp-mkp .ad { padding: 0 0; } #ygrp-mkp .ad p { margin: 0; } #ygrp-mkp .ad a { color: #0000ff; text-decoration: none; } #ygrp-sponsor #ygrp-lc { font-family: Arial; } #ygrp-sponsor #ygrp-lc #hd { margin: 10px 0px; font-weight: 700; font-size: 78%; line-height: 122%; } #ygrp-sponsor #ygrp-lc .ad { margin-bottom: 10px; padding: 0 0; } #actions { font-family: Verdana; font-size: 11px; padding: 10px 0; } #activity { background-color: #e0ecee; float: left; font-family: Verdana; font-size: 10px; padding: 10px; } #activity span { font-weight: 700; } #activity span:first-child { text-transform: uppercase; } #activity span a { color: #5085b6; text-decoration: none; } #activity span span { color: #ff7900; } #activity span .underline { text-decoration: underline; } .attach { clear: both; display: table; font-family: Arial; font-size: 12px; padding: 10px 0; width: 400px; } .attach div a { text-decoration: none; } .attach img { border: none; padding-right: 5px; } .attach label { display: block; margin-bottom: 5px; } .attach label a { text-decoration: none; } =20=20 blockquote { margin: 0 0 0 4px; } .bold { font-family: Arial; font-size: 13px; font-weight: 700; } .bold a { text-decoration: none; } dd.last p a { font-family: Verdana; font-weight: 700; } dd.last p span { margin-right: 10px; font-family: Verdana; font-weight: 700; } dd.last p span.yshortcuts { margin-right: 0; } div.attach-table div div a { text-decoration: none; } div.attach-table { width: 400px; } div.file-title a, div.file-title a:active, div.file-title a:hover, div.fi= le-title a:visited { text-decoration: none; } div.photo-title a, div.photo-title a:active, div.photo-title a:hover, div= .photo-title a:visited { text-decoration: none; } div#ygrp-mlmsg #ygrp-msg p a span.yshortcuts { font-family: Verdana; font-size: 10px; font-weight: normal; } .green { color: #628c2a; } .MsoNormal { margin: 0 0 0 0; } o { font-size: 0; } #photos div { float: left; width: 72px; } #photos div div { border: 1px solid #666666; height: 62px; overflow: hidden; width: 62px; } #photos div label { color: #666666; font-size: 10px; overflow: hidden; text-align: center; white-space: nowrap; width: 64px; } #reco-category { font-size: 77%; } #reco-desc { font-size: 77%; } .replbq { margin: 4px; } #ygrp-actbar div a:first-child { /* border-right: 0px solid #000;*/ margin-right: 2px; padding-right: 5px; } #ygrp-mlmsg { font-size: 13px; font-family: Arial, helvetica,clean, sans-serif; *font-size: small; *font: x-small; } #ygrp-mlmsg table { font-size: inherit; font: 100%; } #ygrp-mlmsg select, input, textarea { font: 99% Arial, Helvetica, clean, sans-serif; } #ygrp-mlmsg pre, code { font:115% monospace; *font-size:100%; } #ygrp-mlmsg * { line-height: 1.22em; } #ygrp-mlmsg #logo { padding-bottom: 10px; } #ygrp-msg p a { font-family: Verdana; } #ygrp-msg p#attach-count span { color: #1E66AE; font-weight: 700; } #ygrp-reco #reco-head { color: #ff7900; font-weight: 700; } #ygrp-reco { margin-bottom: 20px; padding: 0px; } #ygrp-sponsor #ov li a { font-size: 130%; text-decoration: none; } #ygrp-sponsor #ov li { font-size: 77%; list-style-type: square; padding: 6px 0; }=20 #ygrp-sponsor #ov ul { margin: 0; padding: 0 0 0 8px; } #ygrp-text { font-family: Georgia; } #ygrp-text p { margin: 0 0 1em 0; } #ygrp-text tt { font-size: 120%; } #ygrp-vital ul li:last-child { border-right: none !important;=20 }=20 --> </style> </head> <!--~-|**|PrettyHtmlEnd|**|-~--> </html> <!-- end group email --> --001a114060524185a9054aeb77fc--