mzp https://blog.hatena.ne.jp/mzp/ みずぴー日記 https://mzp.hatenadiary.org/ OCaml ABCをパースする際に、24ビットの整数を32ビットの整数に符号拡張したくなった。とりあえず、算術シフトをつかって実現してみた。7ビットシフトなのは、OCamlの整数が31ビットだから。 let s_extend d = (d lsl 7) asr 7 これでもいいんだけど、CPUによっては符号拡張命令をもっているらしいから、なんかもったいないような気がする。 id:selvaggio方式 http://twitter.com/selvaggio/statuses/950446367で教えてもらった。 let s_extend d = 0x1fe * (0x00800000 land d) l… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmzp.hatenadiary.org%2Fentry%2F20081008%2Fsignextend" title="符号拡張がしたい - みずぴー日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2008-10-08 00:00:01 rich https://mzp.hatenadiary.org/entry/20081008/signextend 1.0 100%