Matsushima, Kazuhiro Gab-km

## robustness_head.rst

      
              2 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                Gab-km
                / robustness_head.rst
            
            
              Last active
              August 29, 2015 14:08
            
              
                公式チュートリアルである "Getting Started with Erlang User's Guide" の翻訳 - Robustness (翻訳中)
              
          
タイトル
Erlang ユーザーガイドから始めよう

バージョン
6.2

原文
Erlang -- Getting Started with Erlang User's Guide

原文の著作権者
Ericsson AB.


## TestBuilder.fs
// コンピュテーション式中で用いる型
type AssertionResult<'T> =
    | NotAsserted of 'T
    | Success
    | Failure of string

// コンピュテーションビルダー
type TestBuilder() =
    member self.Bind(x, f) =
        match x with

## Applyable.java
// TVar -> TResult
interface Applyable<TVar, TResult> {
    public abstract TResult apply(TVar variable);
}

## Adder.java
class Adder implements Applyable {
    @override
    public int func(int a, int b) {
        return a + b;
    }
}

## obsolete.py
def obsolete(message=None, deprecated=False):
    """今後使用しない関数やメソッドにマークを付けます。
    @message 警告に表示するテキスト
    @deprecated すでに非推奨の場合、True
                今後非推奨になる予定の場合、False
    @see http://msdn.microsoft.com/ja-jp/library/system.obsoleteattribute.aspx
    """
    def outer(fn):
        import warnings
        def inner(*args, **kwargs):

## dict.py
def add_dict(this, other):
    """2つの dict の和を取る関数(キー重複は後勝ち)
    @this ベースとなる dict オブジェクト
    @other 追加される dict オブジェクト
    @return 2つの dict を合成した dict
    """
    result = this.copy()
    for key in other:
        result[key] = other[key]
    return result

## concurrentProgramming_head.rst

      
              2 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                Gab-km
                / concurrentProgramming_head.rst
            
            
              Last active
              August 29, 2015 14:07
            
              
                公式チュートリアルである "Getting Started with Erlang User's Guide" の翻訳 - Concurrent Programming (翻訳中)
              
          
タイトル
Erlang ユーザーガイドから始めよう

バージョン
6.2

原文
Erlang -- Getting Started with Erlang User's Guide

原文の著作権者
Ericsson AB.


## sequencialProgramming_head.rst

      
              2 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                Gab-km
                / sequencialProgramming_head.rst
            
            
              Last active
              December 17, 2015 03:05
            
              
                公式チュートリアルである "Getting Started with Erlang User's Guide" の翻訳 - Sequential Programming
              
          
タイトル
Erlang ユーザーガイドから始めよう

バージョン
6.2 / 7.1

原文
Erlang -- Getting Started with Erlang User's Guide

原文の著作権者
Ericsson AB.


## introduction_head.rst

      
              2 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                Gab-km
                / introduction_head.rst
            
            
              Last active
              December 17, 2015 00:48
            
              
                公式チュートリアルである "Getting Started with Erlang User's Guide" の翻訳 - Introduction
              
          
タイトル
Erlang ユーザーガイドから始めよう

バージョン
7.2

原文
Erlang -- Getting Started with Erlang User's Guide

原文の著作権者
Ericsson AB.


## gist:afc2db9d6503004f6ed1
namespace FsCheck.Ext

module Test =
    open System
    open FsCheck
    open FsCheck.Arb

    type JapaneseChar = char

    let japaneseChar (s: string) =
	// コンピュテーション式中で用いる型
	type AssertionResult<'T> =
	\| NotAsserted of 'T
	\| Success
	\| Failure of string

	// コンピュテーションビルダー
	type TestBuilder() =
	member self.Bind(x, f) =
	match x with
	// TVar -> TResult
	interface Applyable<TVar, TResult> {
	public abstract TResult apply(TVar variable);
	}
	class Adder implements Applyable {
	@override
	public int func(int a, int b) {
	return a + b;
	}
	}
	def obsolete(message=None, deprecated=False):
	"""今後使用しない関数やメソッドにマークを付けます。
	@message 警告に表示するテキスト
	@deprecated すでに非推奨の場合、True
	今後非推奨になる予定の場合、False
	@see http://msdn.microsoft.com/ja-jp/library/system.obsoleteattribute.aspx
	"""
	def outer(fn):
	import warnings
	def inner(args, *kwargs):
	def add_dict(this, other):
	"""2つの dict の和を取る関数(キー重複は後勝ち)
	@this ベースとなる dict オブジェクト
	@other 追加される dict オブジェクト
	@return 2つの dict を合成した dict
	"""
	result = this.copy()
	for key in other:
	result[key] = other[key]
	return result
	namespace FsCheck.Ext

	module Test =
	open System
	open FsCheck
	open FsCheck.Arb

	type JapaneseChar = char

	let japaneseChar (s: string) =