第09章 歩幅の調整

[at-grandpa]

TODO

• $5 + 10 CHF = $10（レートが2:1に場合）
• $5 * 2 = $10
• amountをprivateにする
• Dollarの副作用どうする？
• Moneyの丸め処理をどうする？
• equals
• hashCode
• nullとの等価性比較
• 他のオブジェクトとの等価性比較
• 5CHF*2=10CHF
• DollarとFrancの重複
• equalsの一般化
• timesの一般化
• FrancとDollarを比較する
• 通貨の概念
• testFrancMultiplicationを削除する?

[at-grandpa]

サブクラスを消したい。通貨の概念を導入するのはどうだろう。

[at-grandpa]

これ、思いつく？どうやって思いつく？

[at-grandpa]

Flyweightパターンを用いて、必要十分な通貨オブジェクトを生成して管理したい。とはいえ、まだ文字列だけで十分だろう。

[at-grandpa]

こういう思考に至るのがなぜか。こういう思考に至るのはテスト駆動開発の恩恵ではないのか。別の恩恵があるのか。

[at-grandpa]

テストは通る。

 crystal spec' <

....

Finished in 1.7 milliseconds
4 examples, 0 failures, 0 errors, 0 pending

[at-grandpa]

徐々に2つのクラスの実装を近づけていきたい。各クラスの独自部分をどんどん外（Moneyクラス）においやっていく。

[at-grandpa]

テストは通る。テストがあると、こういった修正が安心してできる。

[at-grandpa]

テストは通る。

[at-grandpa]

さらに、コンストラクタの呼び出し側で@currencyを定義すれば、コンストラクタも共通化できる。

[at-grandpa]

コンパイルできない。

 crystal spec' <

Error in line 1: while requiring "./spec/money_spec.cr"

in spec/money_spec.cr:15: instantiating 'MoneyPackage::Money:Class#franc(Int32)'

      (MoneyPackage::Money.franc(5) == MoneyPackage::Money.franc(5)).should be_true
                           ^~~~~

in src/money_package/money.cr:18: wrong number of arguments for 'MoneyPackage::Franc.new' (given 1, expected 2)
Overloads are:
 - MoneyPackage::Franc.new(amount : Int32, currency : String)

      MoneyPackage::Franc.new(amount)
                          ^~~

[at-grandpa]

コンパイルが通り、テストも通る。

 crystal spec' <

....

Finished in 632 microseconds
4 examples, 0 failures, 0 errors, 0 pending

[at-grandpa]

で、ここで気づくのが、FrancのtimesメソッドがMoneyのfactoryメソッドではなく、直接自分のコンストラクタを呼んでいること。

この修正は割り込みだが、ちょっとした割り込みに限っては、修正してしまおう。

[at-grandpa]

テストは通る。ほんとテストあるおかげで、こういう修正が楽。

[at-grandpa]

小さいステップを踏んで、修正がらく。ちょっとイラッとするかもだけど、「小さくもできる」というのが大事。

[at-grandpa]

Dollarも一気にやってしまおう。

[at-grandpa]

一気に修正できた。

[at-grandpa]

今回のように、必要であれば歩幅を小さくし、行けるなら歩幅を大きくして良い。

[at-grandpa]

コンストラクタが一致したので、親クラスに持っていく。

[at-grandpa]

振り返り。

• 大きめの設計変更にのめり込みそうだったので、その前に手前にある小さな変更に着手した
• 差異を呼び出し側（FactoryMethod側）に移動することによって、2つのサブクラスを近づけていった
• リファクタリングの途中で寄り道して、timesメソッドの中でFactoryMethodを使うように修正した
• Francに行ったリファクタリングをDollarにも同様に、今度は大きな歩幅で一気に適用した
• 完全に同じ内容になったコンストラクタを親クラスへ移動した

[at-grandpa]

どういう歩幅がいいかはどうやってわかるんだろうな。とりあえず整理がつかなかったら歩幅を小さくしようか、って話かな。

[at-grandpa]

TODO

• $5 + 10 CHF = $10（レートが2:1に場合）
• $5 * 2 = $10
• amountをprivateにする
• Dollarの副作用どうする？
• Moneyの丸め処理をどうする？
• equals
• hashCode
• nullとの等価性比較
• 他のオブジェクトとの等価性比較
• 5CHF*2=10CHF
• DollarとFrancの重複
• equalsの一般化
• timesの一般化
• FrancとDollarを比較する
• 通貨の概念
• testFrancMultiplicationを削除する?