aboutsummaryrefslogtreecommitdiff
path: root/tapelibrary.rb
blob: daf0e2e0ba6e44d1357458cce29c90b41f69e5ba (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
require 'rubygems'
require 'docile'

Library = Struct.new(:name, :tapes)

class LibraryBuilder
	def initialize name
		@name = name
		@nextslot = 1
		@tapes = Hash.new
	end
	def tape name, opts = {}
		slot = opts[:slot]
		if slot.nil? then
			@tapes[name] = @nextslot
			@nextslot += 1
		else
			@nextslot += 1 if slot == @nextslot
			@tapes[name] = slot
		end
	end
	def build
		Library.new @name, @tapes
	end
end

def library name, &block
	Docile.dsl_eval(LibraryBuilder.new(name), &block).build
end

Robot = Struct.new(:name, :libraries)

class RobotBuilder
	def initialize name
		@name = name
		@libraries = Hash.new
	end
	def uselibrary name, library
		@libraries[name] = library
	end
	def build
		Robot.new @name, @libraries
	end
end

def robot name, &block
	Docile.dsl_eval(RobotBuilder.new(name), &block).build
end