Example #1
0
 protected virtual void Write(CiArrayAccess expr)
 {
     WriteChild(expr, expr.Array);
     Write('[');
     Write(expr.Index);
     Write(']');
 }
Example #2
0
 protected override void Write(CiArrayAccess expr)
 {
     if (expr.Array is CiConstAccess || expr.Array is CiBinaryResourceExpr)
     {
         Write('$');
     }
     WriteChild(expr, expr.Array);
     if (expr.Array.Type is CiArrayPtrType)
     {
         Write("->");
     }
     Write('[');
     Write(expr.Index);
     Write(']');
 }
Example #3
0
 protected virtual void Write(CiArrayAccess expr)
 {
     WriteChild(expr, expr.Array);
     Write('[');
     Write(expr.Index);
     Write(']');
 }
Example #4
0
File: GenPerl5.cs Project: epi/cito
	protected override void Write(CiArrayAccess expr)
	{
		if (expr.Array is CiConstAccess || expr.Array is CiBinaryResourceExpr)
			Write('$');
		WriteChild(expr, expr.Array);
		if (expr.Array.Type is CiArrayPtrType)
			Write("->");
		Write('[');
		Write(expr.Index);
		Write(']');
	}