basic types/interfaces test
R=r
OCL=17247
CL=17247
diff --git a/test/ken/interbasic.go b/test/ken/interbasic.go
new file mode 100644
index 0000000..2603d25
--- /dev/null
+++ b/test/ken/interbasic.go
@@ -0,0 +1,104 @@
+// $G $D/$F.go && $L $F.$A && ./$A.out
+
+// Copyright 2009 The Go Authors. All rights reserved.
+// Use of this source code is governed by a BSD-style
+// license that can be found in the LICENSE file.
+
+package main
+
+type myint int;
+type mystring string;
+type I0 interface {};
+
+func
+f()
+{
+ var ia, ib I0;
+ var i myint;
+ var s mystring;
+
+ if ia != ib { panicln("1"); }
+
+ i = 1;
+ ia = i;
+ ib = i;
+ if ia != ib { panicln("2"); }
+ if ia == nil { panicln("3"); }
+
+ i = 2;
+ ia = i;
+ if ia == ib { panicln("4"); }
+
+ ia = nil;
+ if ia == ib { panicln("5"); }
+
+ ib = nil;
+ if ia != ib { panicln("6"); }
+
+ if ia != nil { panicln("7"); }
+
+ s = "abc";
+ ia = s;
+ ib = nil;
+ if ia == ib { panicln("8"); }
+
+ s = "def";
+ ib = s;
+ if ia == ib { panicln("9"); }
+
+ s = "abc";
+ ib = s;
+ if ia != ib { panicln("a"); }
+}
+
+func
+main()
+{
+ var ia [20]I0;
+ var b bool;
+ var s string;
+ var i8 int8;
+ var i16 int16;
+ var i32 int32;
+ var i64 int64;
+ var u8 uint8;
+ var u16 uint16;
+ var u32 uint32;
+ var u64 uint64;
+
+ f();
+
+ ia[0] = "xxx";
+ ia[1] = 12345;
+ ia[2] = true;
+
+ s = "now is"; ia[3] = s;
+ b = false; ia[4] = b;
+
+ i8 = 29; ia[5] = i8;
+ i16 = 994; ia[6] = i16;
+ i32 = 3434; ia[7] = i32;
+ i64 = 1234567; ia[8] = i64;
+
+ u8 = 12; ia[9] = u8;
+ u16 = 799; ia[10] = u16;
+ u32 = 4455; ia[11] = u32;
+ u64 = 765432; ia[12] = u64;
+
+ s = ia[0]; if s != "xxx" { panicln(0,s); }
+ i32 = ia[1]; if i32 != 12345 { panicln(1,i32); }
+ b = ia[2]; if b != true { panicln(2,b); }
+
+ s = ia[3]; if s != "now is" { panicln(3,s); }
+ b = ia[4]; if b != false { panicln(4,b); }
+
+ i8 = ia[5]; if i8 != 29 { panicln(5,i8); }
+ i16 = ia[6]; if i16 != 994 { panicln(6,i16); }
+ i32 = ia[7]; if i32 != 3434 { panicln(7,i32); }
+ i64 = ia[8]; if i64 != 1234567 { panicln(8,i64); }
+
+ u8 = ia[9]; if u8 != 12 { panicln(5,u8); }
+ u16 = ia[10]; if u16 != 799 { panicln(6,u16); }
+ u32 = ia[11]; if u32 != 4455 { panicln(7,u32); }
+ u64 = ia[12]; if u64 != 765432 { panicln(8,u64); }
+}
