本の返却

CoddyのRジャーニー「オブジェクト指向プログラミング」セクションの一部。レッスン 52/57。

チャレンジ

簡単

return_book(name, id)メソッドを通じてRETURNコマンドを追加してください。前のステップのすべてのコマンドが、これまでどおり正確に動作するようにしてください。

RETURN <name> <id>：借用の場合と同様に、no member boまたはno book 9と応答します。メンバーがその本を所持していない場合はada does not have Duneと応答します。それ以外の場合は、メンバーの貸出中の本からidを削除し、本を利用可能な状態にして（borrowerがcharacter(0)になります）、ada returned Duneと応答します。

提供されたコードは、すべての入力行をlib$handle(line)に渡し、返された各応答をそれぞれ独立した行に出力します。メンバー名は小文字1語で、本のidは整数です。また、入力にはここまでで説明したコマンドだけが含まれます。それ以外のコマンドにはunknown commandと応答します。

コードはBook.R、Member.R、Library.Rに記述します。main.Rには提供された入出力コードが含まれており、編集できません。

自分で試してみよう

source("Book.R")
source("Member.R")
source("Library.R")

# 提供された入出力コード: そのままにしておく
input <- suppressWarnings(readLines(file("stdin")))
lib <- Library$new()
for (line in input) {
  for (reply in lib$handle(line)) cat(reply, "\n", sep = "")
}