[SIMILAR] WITH 26343 month WITH 24740 adddays WITH 24740 fromgregorian WITH 24740 daysofmonth WITH 24740 formatdays WITH 16493 dropwhile WITH 16493 intersperse WITH 16493 unfoldr WITH 16493 gregorianmonthlength WITH 16493 togregorian WITH 16493 sundaystartweek WITH 16493 lastday WITH 16493 printmonth WITH 16493 formatday WITH 16493 show2 WITH 15497 takewhile WITH 9164 year WITH 9082 integer WITH 8246 ordinaldate WITH 8246 weekdate WITH 8246 toweekdate WITH 8246 splitat WITH 8246 得wh WITH 7815 得$ WITH 7748 除$ WITH 7748 iterate WITH 7748 成$ WITH 7596 import WITH 6955 putstrln WITH 6955 otherwise WITH 6847 calendar WITH 6676 限リ の検索結果 27 件中 1 - 10 件目 (0.029260648 秒)
指定した年・月を以下のような感じでカレンダーっぽく表示。 | 1 2 3 | 4 5 6 7 8 9 10 | 11 12 13 14 15 16 17 | 18 19 20 21 22 23 24 | 25 26 27 28 29 30 31 なんとなく考えると、具体的な方法を考えなくても書けてしまうのが良い感じです。 import Data.List (dropWhile, intersperse, takeWhile, unfoldr ...
SIGALRMシグナルを使っているライブラリをFFIで呼び出すと、コールバックのスタブの中でInterruptedというメッセージを出してプロセスが落ちてしまうことがあるので、テストコードを書いて調べてみました。 alarm.h void test(); alarm.c #include <signal.h> #include <string.h> #include <stdio.h> #include ...
# (スコア:1222)
HDBC-1.0.1.0を使ってMySQL 5.0.24に接続するテスト。HDBCにはMySQLのドライバが無いので、unixODBCを使ってODBC経由で接続します。 unixODBCは2.2.11、mysql-connector-odbcは3.51.12、HDBC-ODBCは1.0.1.0を使います。 import IO import qualified Database.HDBC as DB import qualified Database.HDBC.ODBC a ...
# (スコア:1198)
HSQL-1.7を使ってMySQL 5.0.24に接続してみるテスト。 module Main where import IO import qualified Database.HSQL as DB import qualified Database.HSQL.MySQL as MySQL host = "localhost" db = "test" user = "root" password = "password" main :: IO () main = process `DB.catchSql` print where proc ...
# (スコア:1163)
data Color = RED | BLUE のような型があるときに、この値と整数をマッピングするにはEnumを使うのが楽です。 data Color = RED | BLUE deriving Enum intToColor = toEnum colorToInt = fromEnum ところが、intToColorに範囲外の整数を渡されると例外になってしまってうれしくありません。適当なデフォルト値に ...
# (スコア:1084)
GHC 6.6からは、 list :: [forall a. Num a => a] list = [1 :: Int, 1 :: Float, 1 :: Integer] のようにして多相型のリストをそのまま作ることができるようです。 ...
# (スコア:1078)
ブランチのマージの仕方。 # ブランチでの変更をコミット $ svn commit # 元のブランチにスイッチ $ svn switch file:///home/svn/q3/trunk/q3 # マージ $ svn merge -r 8:HEAD file:///home/svn/q3/branches/new-branch/q3 # コミット $ svn commit # ブランチがいらなければ削除 $ svn delete file:///home/s ...
# (スコア:919)
ブランチの作り方。 # ブランチ用のディレクトリの作成 $ svn mkdir file:///home/svn/q3/branches # ブランチの作成 $ svn copy file:///home/svn/q3/trunk \ file:///home/svn/q3/branches/new-branch # チェックアウトしているファイルをスイッチ $ svn switch file:///home/svn/q3/branches/new-branch/q3 ...
# (スコア:919)
mod_rewriteで以下のようなルールを定義してパスをクエリパラメータに置き換えたとします。 RewriteRule ^(.*)$ test.cgi?value=$1 [L] ここで、http://example.com/Test%2BTestにアクセスするとCGI側からvalueの正しい値が取れず、「Test Test」になってしまいます。これは、mod_rewriteがマッチさせる前にURL ...
# (スコア:901)
キーと値からなる設定ファイルをパースするとします。設定ファイルはこんな感じです。 name=Test value=5 マップなどで値を持つという方法もありますが、ちゃんと型付けするために専用の型を用意することにします。そうするとパースするコードはこんな感じでしょうか。 import Control.Monad import Data.Maybe ...
# (スコア:901)
# (スコア:10000)