Added compiler tests.

compiler/tests/len_array.mpcl

@@ -0,0 +1,11 @@
+// -*- go -*-
+
+package main
+
+type Field [10]int32
+
+// @Test 0 0 = 10
+func main(a, b int32) int {
+	var arr Field
+	return len(arr)
+}

compiler/tests/len_array_sum.mpcl

@@ -0,0 +1,22 @@
+// -*- go -*-
+
+package main
+
+type Field [10]int32
+
+// @Test 0 0 = 45
+// @Test 1 10 = 56
+func main(a, b int32) int {
+	var arr Field
+
+	for i := 0; i < len(arr); i++ {
+		arr[i] = i
+	}
+
+	var sum int32
+	for i := 0; i < len(arr); i++ {
+		sum += arr[i]
+	}
+
+	return sum + a + b
+}

compiler/tests/len_string.mpcl

@@ -0,0 +1,9 @@
+// -*- go -*-
+
+package main
+
+// @Test 0 0 = 13
+func main(a, b int32) int {
+	val := "Hello, world!"
+	return len(val)
+}

compiler/tests/len_string_sum.mpcl

@@ -0,0 +1,15 @@
+// -*- go -*-
+
+package main
+
+// @Test 0 0 = 1161
+func main(a, b int32) int {
+	val := "Hello, world!"
+
+	var sum int32
+	for i := 0; i < len(val); i++ {
+		sum += int32(val[i])
+	}
+
+	return sum
+}