同じように配列に対する線形探索を書いた。Haskell のリストをわざわざメモリ上に保存しなおしているという無駄があるがサンプルなので気にしないことにする。 linearSearch :: (Eq a, Storable a) => a -> [a] -> IO (Bool, Int) linearSearch target xs = …

今度はスタックのサイズは固定、要素もIntのみで、状態モナドを止めてみた。スタック自身でポインタを管理する。これで複数のスタックを使える。ほぼCの構造体になったと思うがわたしはCを書けないので自信なし。 import Foreign.Ptr import Foreign.Marshal…

Haskell でスタックを書く、続き。スタックのサイズは固定のまま、スタックの要素を変更できるようにした。 スタックは Foreign.Marshal.Array.mallocArray で確保する。 確保した領域へのポインタは(グローバル変数の替わりに)状態モナドで管理する。 -- St…

Ptr, malloc の勉強のため Haskell でスタックを書いてみた。いろいろ間違っている可能性あり。 スタックは mallocBytes で確保する。 確保した領域へのポインタは(グローバル変数の替わりに)状態モナドで管理する。 -- Stack import Control.Monad.State im…