Matsushima, Kazuhiro Gab-km

「F# のインデントガイドライン」に寄せて

今朝、 F# のインデントガイドラインという記事がアップされてました。大変興味深い内容だったんですが、ちょっと時間がなくて反応ができなかったんで、今やってしまおうと思います。

今回の概要としては、単純に「僕はこんなインデントルールでやってるよ！」という差分を紹介しよう、というものです。そのため、思想の一致を見るルールについては特に取り上げないこととします。

インデントの基本ルール

8つの質問で、F#業界の現状を知る

Webサービス系の隆盛などどこ吹く風、F# 2.0のリリースが騒がれたのが2年前ぐらいだろうか。F#業界の人材動向が、今どうなってるかって？

大方の予想通り凄惨ですよ。

それが分かる方法がある。F#技術者に技術力を問う8つの質問によってだ。F#業界のエンジニアの平均レベルを知りたくって、いろんな会社さんのF#開発者（経験者）向けに以下のような8つの質問をしたことはない(してはみたい)。対象者としては、F#経験3から4年の現役バリバリのはずのF#エンジニアだ。

何故私は Heroku から離れたか、および新しい AWS セットアップのメモ

原著者:	Adrian Holovaty
原文:	Why I left Heroku, and notes on my new AWS setup

金曜日、私は Heroku から Amazon Web Services(AWS) を直接使うように Soundslice を移行しました。私はこの変更ができてとても、そうとても嬉しくて、私がどうやったかということと、もし皆さんが同じような立場だったら何故それを検討すべきかということについて広く伝えたいと思います。

	from tkinter import Frame, Button, LEFT, BOTH

	class MyFrame(Frame):

	def __init__(self, master=None):
	Frame.__init__(self, master)
	self.title_text = 'タイトル'
	self.master.title(self.title_text)
	self.b_change_title = Button(self, font=('Consolas', '24'),
	text='タイトル変更', command=self.change_title)

	親愛なる日本の F# 開発者の皆さん
	Dear Japanese F# Developers

	私の名前はペトロギアナキス・パンテリスといい、 {m}brace (http://www.m-brace-net)
	のプロジェクト・マネジャーをしております。現在、{m}brace は品質保証テストの段階にあり、
	プライベート・ベータ版が2か月以内に利用可能になります。私たちはアイディアや私たちが
	やってきた実装、そしてもちろん沢山の F# のコードや例を提示するためにビデオ会議のイベント
	を企画したいと考えております。
	My name is Petrogiannakis Pantelis and i am the project manager of {m}brace
	(http://www.m-brace.net). At this time {m}brace is under quality assurance

	// target : exec メソッドを持つオブジェクト
	// num : exec メソッドに渡す値
	let inline exec< ^T when ^T : (member exec : int -> string)> target num =
	(^T : (member exec : int -> string) (target, num))

	// exec メソッドを持つインターフェイス
	type IExec =
	abstract exec : int -> string

	// IExec インターフェイスを実装するクラス

	import std.stdio;
	import std.stream;
	import std.socket;
	import std.typecons;
	import msgpack;

	void main()
	{
	communicateWithPythonClient();

	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";

	open System

	//============================================
	// IOモナド
	//============================================
	module IO =
	type IO<'a> = IO of (unit -> 'a)

	type IOBuilder() =
	member this.Bind (IO x, f) = f (x())

	let undefined _ = failwith "undefined"
	let hoge (x : string) : int = undefined()