oberonjs/test/expected/check_indexes.js

<rtl code>
var m = function (){

function readCharArray(a/*ARRAY OF CHAR*/){
	var c = 0;
	c = RTL$.charAt(a, 1);
	c = RTL$.charAt(a, RTL$.charAt(a, 1));
}

function writeCharArray(a/*VAR ARRAY OF CHAR*/){
	var c = 0;
	RTL$.putAt(a, 1, c);
	RTL$.putAt(a, RTL$.charAt(a, 1), c);
}

function readIntArray(a/*ARRAY OF INTEGER*/){
	var i = 0;
	i = RTL$.getAt(a, 1);
	i = RTL$.getAt(a, RTL$.getAt(a, i));
}

function writeIntArray(a/*VAR ARRAY OF INTEGER*/){
	var i = 0;
	RTL$.putAt(a, 1, i);
}

function multiDimArray(i/*INTEGER*/, j/*INTEGER*/){
	var a = RTL$.makeArray(5, 5, 0);
	RTL$.putAt(RTL$.getAt(a, 1), 2, RTL$.getAt(RTL$.getAt(a, 3), 4));
}

function arrayOfRecords(i/*INTEGER*/){
	var $scope1 = $scope + ".arrayOfRecords";
	function anonymous$1(){
	}
	var a = RTL$.makeArray(3, function(){return new anonymous$1();});
	RTL$.copy(RTL$.getAt(a, i + 1 | 0), RTL$.getAt(a, i), {record: {}});
}
}();