Skip to content

Instantly share code, notes, and snippets.

Matsushima, Kazuhiro Gab-km

Block or report user

Report or block Gab-km

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View gist:afc2db9d6503004f6ed1
namespace FsCheck.Ext
module Test =
open System
open FsCheck
open FsCheck.Arb
type JapaneseChar = char
let japaneseChar (s: string) =
@Gab-km
Gab-km / IOSample.fs
Last active Dec 17, 2015
人様の作品をいじっているだけです
View IOSample.fs
open System
//============================================
// IOモナド
//============================================
module IO =
type IO<'a> = IO of (unit -> 'a)
type IOBuilder() =
member this.Bind (IO x, f) = f (x())
@Gab-km
Gab-km / HttpStatus.fs
Last active Dec 14, 2015 — forked from anonymous/HttpStatus.fs
httpstatus コマンドで、HTTP のステータスコードをすばやくしらべる!
View HttpStatus.fs
type HttpStatus =
{ Code: string; Message: string }
override self.ToString () = sprintf "%s %s" self.Code self.Message
let httpStatus code message = { Code = code; Message = message }
let httpStatusList =[
httpStatus "100" "Continue";
httpStatus "101" "Switching Protocols";
httpStatus "102" "Processing";
@Gab-km
Gab-km / github-flow.ja.md
Last active Nov 3, 2019 — forked from juno/github-flow.ja.md
GitHub Flow (Japanese translation)
View github-flow.ja.md

GitHub Flow

31 Aug 2011

git-flowの問題点 (Issues with git-flow)

私は人々にGitを教えるためにあちこちを飛び回っているが、最近のほぼすべてのクラスやワークショップで git-flow についてどう思うかを尋ねられた。私はいつも、git-flowは素晴らしいと思うと答えている。何百万ものワークフローを持ったシステム(Git)を提供し、ドキュメントもあるし、よくテストされている。フレキシブルなワークフローは、実に容易なやり方で多くの開発者の役に立つ。標準的なものになりつつあり、開発者はプロジェクトや企業の間を移動しつつこの標準的なワークフローに馴染むことができる。

@Gab-km
Gab-km / hgrc
Created Sep 4, 2011 — forked from Gab-km/hgrc
hg fix ["fixed message"] (for Windows)
View hgrc
# hgrc
# if you use some Unix base operating systems, like Linux distributions, BSDs or Macs,
# see: https://gist.github.com/1187980
[extensions]
mq =
hgshelve = $HOME/.mercurial/extensions/hgshelve/hgshelve.py
[alias]
# fix latest commit message
@Gab-km
Gab-km / hgrc
Created Sep 4, 2011 — forked from troter/hgrc
hg fix "fixed message" # (hg 1.8.x only)
View hgrc
# hgrc
[extensions]
mq =
hgshelve = $HOME/.mercurial/extensions/hgshelve/hgshelve.py
[alias]
# fix latest commit message (hg 1.8.x only)
fix = ! \
$HG shelve --all -n 'tmp.hg-fix' && \
You can’t perform that action at this time.