Simple queue realisation

.gitignore

@@ -1,6 +1,7 @@
 /.crystal/
+/.shards/
+/bin/
+/build/
 /docs/
 /lib/
-/bin/
-/.shards/
 *.dwarf

Dockerfile

@@ -0,0 +1,3 @@
+FROM alpine:edge as builder
+
+RUN apk add -u crystal shards libc-dev

Makefile

@@ -1,3 +1,8 @@
+.PHONY: build-docker
+build-docker:
+	docker pull alpine:edge
+	docker build -t village-crystal .
+
 .PHONY: format
 format:
 	./cr tool format ./src ./spec
@@ -5,3 +10,8 @@ format:
 .PHONY: spec
 spec:
 	./cr spec --warnings all --error-on-warnings
+
+.PHONY: release
+release:
+	mkdir -p build
+	./cr build ./src/village.cr --release --no-debug --static -o build/village

cr

@@ -6,4 +6,4 @@ docker run -it \
 	-u "$(id -u):$(id -g)" \
 	-v "$PWD:/app" \
 	-w "/app" \
-	crystallang/crystal:0.30.0 crystal "$@"
+	village-crystal crystal "$@"

shards

@@ -6,4 +6,4 @@ docker run -it \
 	-u "$(id -u):$(id -g)" \
 	-v "$PWD:/app" \
 	-w "/app" \
-	crystallang/crystal:0.30.0 shards "$@"
+	village-crystal shards "$@"

src/village.cr

@@ -1,5 +1,76 @@
-module Village
+class Resources
-  VERSION = "0.1.0"
+  def initialize
+    @wood = 0
+  end
 
-  # TODO: Put your code here
+  def add_wood(x)
+    @wood += x
+  end
+
+  def wood
+    @wood
+  end
 end
+
+abstract class Command
+  def initialize(ts : Int32)
+    @ts = ts
+  end
+
+  def ts
+    @ts
+  end
+
+  abstract def run(queue : CommandQueue, res : Resources)
+end
+
+class BuildMillCommand < Command
+  def run(queue : CommandQueue, res : Resources)
+    puts "build mill"
+    c = GetWoodCommand.new(@ts + 5)
+    queue.push(c)
+  end
+end
+
+class GetWoodCommand < Command
+  def run(queue : CommandQueue, res : Resources)
+    res.add_wood(10)
+    puts "get wood"
+    c = GetWoodCommand.new(@ts + 5)
+    queue.push(c)
+  end
+end
+
+class CommandQueue
+  def initialize
+    @resources = Resources.new
+    @data = Array(Command).new
+  end
+
+  def push(command : Command)
+    printf "push command %d\n", command.ts
+    @data.push(command)
+    @data.sort! do |c|
+      -c.ts
+    end
+  end
+
+  def run(ts : Int32)
+    while @data.size != 0
+      c = @data.pop
+      printf "pop command %d\n", c.ts
+      if c.ts > ts
+        break
+      end
+      c.run(self, @resources)
+    end
+    printf "Wood: %d\n", @resources.wood
+  end
+end
+
+q = CommandQueue.new
+q.push(BuildMillCommand.new(0))
+q.push(BuildMillCommand.new(0))
+q.push(BuildMillCommand.new(0))
+q.push(BuildMillCommand.new(2))
+q.run(10)