# See the License for the specific language governing permissions and
# limitations under the License.
-redef class NativeArray[E]
- new(length: Int) is intern
-end
-
-redef class NativeString
- new(length: Int) is intern
-end
-
-var s = new NativeString(4)
-s[0] = 'N'
-s[2] = 't'
-s[1] = 'i'
-s[3] = '\0'
+var s = new CString(4)
+s[0] = 0x4E
+s[2] = 0x74
+s[1] = 0x69
+s[3] = 0
print s.class_name
print s[0]
print s.to_s
print a[0]
print a.to_a.join(",")
+var i
+i = 3
+a = new NativeArray[Int](i)
+i = 1
+a[i] = i
+print a[i]
+print a[1]