北海道苫小牧市出身の初老PGが書くブログ

永遠のプログラマを夢見る、苫小牧市出身のおじさんのちらしの裏

monadiusを動かす

12年前に書かれた http://www.geocities.jp/takascience/haskell/monadius_ja.html を手元で動かした。と言っても、ほぼ手を加えずにそのまま動いた。 $ diff -ur monadius.BK/ monadius diff -ur monadius.BK/src/Main.hs monadius/src/Main.hs --- monadiu…

shu-thing (シューティングもどき) を動かす

12年前にhaskellで書かれた shu-thing を手元で動かした。と言っても、ほとんど何もせずに動いてしまった。 @@ -10,6 +10,7 @@ import System.Process main = do + getArgsAndInitialize keystate <- newIORef [] cp <- newIORef (openingProc keystate) ini…

久々にoptparse-applicative使った

いつも optparse-applicative ってどう使うんだっけって悩むのだけど、 philoponさんのエントリ を見ながらやるとトップダウンにコードを書けてすごくよかった。

Mac Pro と BRAVIA の HDMI 接続

Mac Pro(ゴミ箱) と sony の BRAVIA を HDMI で繋いでいるのだけど、まったく安定しない。具体的に言うと、認識しないことがほとんど。BRAVIAとMac Proの電源をON OFFしつつHDMIケーブルをポートを変えつつ何度も何度も何度も何度も何度も何度も差し替えると…

Slackのstarとmute、joinの使い方

最近チャネルが増えてSlackを見るのが大変だったので改善した。社内で投稿したものだが、設定を変えてから快適になったので紹介する。 変更前のチャネルの管理方針 重要っぽいかそうでないかでなんとなく分けていた。大事っぽかったらstarで、大事じゃないけ…

VS 2017でrustを使う

Surface Studio に rust をインストールしようと思ったんだけど、 Microsoft Visual C++ Build Tools 2015 が要るらしい。せっかくなので Visual Studio 2017 使おうと思って探したんだけど、パッケージングの仕方が変わってるぽい。 まず、 このエントリ の…

Alternative preludes

Alternative preludes – Haskell – Aelve Guide Preludeの代替品の評価。どれも一長一短感ある。 自分のモチベーションはpartial functionよりも Text なんだけど、 Text にまとめたいと思いつつも、結局パッケージを使う以上は現状では String からは逃れら…

textlint の導入

textlintで日本語の自動校正サービスを作ってみた! | それいけ!フロントエンド 以前面倒だと思ってやってなかった textlint だけど、こちらのエントリの通りやったらさくっと動いた。 ざっくり手順。 npm の作法を知らないのが怖いところだけど、まあ、オ…

Server::Starter を利用できるサーバの実装

http://qiita.com/hiratara/items/2dacf8470c378b130d5c に書いたとおり。 下回りが苦手なので色々調べたのだけど、今回もGREEの https://github.com/gree/haskell-prefork なるリポジトリが役に立った。 fork するだけじゃんと思って中を読むと、環境変数仕…

wai-graceful

wai-graceful の仕組みを眺めた。 warp 側に手を入れずにどうしてるのかと思ったら forkIO してサーバスレッドを別で立てといた上で、シグナル受け取ってからリクエスト捌き終わるまでメインスレッド残すのね。リクエストの処理が強制終了されることがないも…

Windows 上での getChar のための no-buffering-workaround パッケージ

hiratara.hatenadiary.jp エンターキーを押さないとキー入力を受け付けてくれない。大昔からチケットが上がっていて、 今日気がついたのだけど、Hackageにいい感じのパッケージが上がってる。 no-buffering-workaround: Workaround for GHC bug #2189. 使い…

Unit への implicit conversion

内容はともかく気になったのが、 def A_B_Cのつもりで書いた間違っているのにビルドが通る例(): Future[Unit] = { funcA() .map { _ =>funcB()} .map { _ =>funcC()} // ※たとえでこう書いていますが、本来はfor文とかを使いましょう // ※返値の型は本当はFu…

`stack setup --upgrade-cabal` した

lts-7.19 使ってたら嫌な感じのエラー。 /tmp/stack25595/cairo-0.13.3.1/Setup.hs:8:29: error: • Couldn't match expected type ‘Distribution.Simple.UserHooks.UserHooks’ with actual type ‘Cabal-1.24.2.0:Distribution.Simple.UserHooks.UserHooks’ N…

"hSetBuffering stdin NoBuffering doesn't work on Windows" とのこと

完全に序盤で投げ出されているけど、Haskellでroguelikeを実装するエントリ。 https://github.com/jamiltron/Thieflike Haskell には https://hackage.haskell.org/package/LambdaHack っていうroguelikeがあって そっちのほうが真面目に作られてるのだけど…

msys2の最新版で [lost server] が発生

msys2 をアップデートしたら、 tmux でクリップボード周りを操作すると [lost server] 的なメッセージが出て死ぬようになってしまった。今までも何度かあったこととは言え、辛さに溢れる。 とりあえずこれの通り msys2 のランタイムのバージョン下げたら直っ…

MSYS2でHDBC-sqlite3をコンパイル

当然のことながら、msys2のshellではなくmingw64のshellから操作する。 まず、 sqlite3 を入れる。 pacman -S mingw64/mingw-w64-x86_64-sqlite3 後はビルドするだけなんだけど、2点注意がいる。 --extra-include-dirs と --extra-lib-dirs にmingw64関連の…

AllowAmbiguousTypes拡張と型適用

このように f を定義して実行したい。 f :: String -> String f = show . read main :: IO () main = putStrLn $ f "True" エラーが出る。 Prelude> :l test.hs [1 of 1] Compiling Main ( test.hs, interpreted ) test.hs:5:5: error: • Ambiguous type var…

ConnectionFailure getAddrInfo: does not exist (Name or service not known) が出た

vagrantで ubuntu/zesty64 を使ったら、 https://github.com/commercialhaskell/stack/issues/2536 的なメッセージが出てかなりの高確率で stack setup に失敗した。 そもそも安定版使ってないほうが悪かったので、 ubuntu/xenial64 使うようにしたら収まっ…

2017年センター試験英語

最近ひどく疲れているので http://www.toshin.com/center/ から英語を解いた。リスニングが42点で筆記が169点。おもったよりひどくないと思ってしまったけど、本来満点取らないと駄目なやつだよね、これ。現役の頃を思い出して気分転換にはなったので良しと…

stackのコードを読む(3)

リソルバのダウンロード先URLのデフォルトは Stack.Config.Urls で定義されているがコンフィグで上書きできる リゾルバはYAMLでこんな感じで全パッケージとバージョンが書かれてる packages: drawille: .. 省略 .. version: '0.1.2.0' .. 省略 .. descriptio…

ghci 7.10 と 8.0 のレコード記法の違い

DuplicateRecordFields を実装した影響だと思うけど、 ghci で重複するレコード名を定義したときの振る舞いが 7.10 と 8.0 で違ってる。 まず 7.10 。「フィールド定義が消される」という振る舞いに見える。 $ stack --resolver ghc-7.10 ghci Configuring G…

stackのコードを読む(2)

stack.yaml はどこで読むのか Runner.hs#withBuildConfigAndLock なんてのがあって、ここで読んでいる。実際に読んでいるのは Config.hs#loadProjectConfigとかで、こいつが FromJSONのインスタンス になっていてパースしてる。設定の優先順位とかは この辺 …

stackのコードを読む

stackのコードを読んでるのでメモ。まだ全然肝心なところに入ってない。 パーサーでコマンドライン引数をパースして、パースの結果として得られる関数を実行する作り optparse-applicativeをフォークして使っている なんの処理を加えてるのかは読んでない 例…

Data.List.(\\)

(\\) という演算子 *1 でリストの差を取れるのだけど、こいつは最初の出現しか削除してくれない。というのを知らなくて、バグった。 Prelude> import Data.List Prelude Data.List> [1, 2, 2, 3, 3, 1] \\ [1, 2, 3] [2,3,1] 複数引くとその個数だけ消える。…

式と型と値

JavaもHaskellも静的型付けの言語だけど、Javaをやっている人とHaskellをやっている人で、「静的型付け」という言葉で頭に描くイメージはだいぶ違うと思う。 じゃあどう違うのかってのを説明すると小難しい話になりがちなのだけど、Haskell 2010 Language Re…

Surface Studio の電源が落ちた

昨日の午前中までは安定していたSurface Studioが、昨日の午後から突然画面が暗転するようになってしまった。初めスリープから復帰できずにシャットダウンしたので、 Surface Book がスリープからの復帰がかなり不安定だったこともあってそれと同じかなくら…

ghcと文字コードとWindowsと

ghc さんは、エラーメッセージに ascii の範囲外の文字を平気で使ってくる。これ、環境によってはハマるので勘弁して欲しい。具体的にはWindowsなんだけど。 例えばこんなメッセージ。 Prelude> 3 / 4 :: Int <interactive>:1:1: error: • No instance for (Fractional In</interactive>…

入門Haskell(10年前の本)

久々に入門Haskellのsamegameを作る章を読んだ。本を買った当時は頭に入ってこなくて流し読みしかしなかった記憶があるけど、今読むと書いてあることはシンプルだった。 この本に問題があるわけではなく10年前の本なので当たり前だけど、なんだかなあと思う…

tls周りが遅くて悲しい

昨日のプログラム のプロファイリング取った。 ... tlsManagerSettings Network.HTTP.Client.TLS 51910 0 0.0 0.0 87.7 92.5 mkManagerSettings Network.HTTP.Client.TLS 51911 0 0.0 0.0 87.7 92.5 ... decodeLenient Data.ByteString.Base64.Lazy 55231 0 …

ストーカー、始めました

冬休みの工作。 lotz84さんが https://github.com/lotz84/haskell/ のHaskellのブックマークをガンガン更新していて、これはいいものだと思ったのでストーカーするバッチを書いた。 soozy.slack.com *1 の #haskell というほとんど誰も使っていない部屋に更…