polserver/testsuite/escript/narray/narray11.src
2015-12-19 02:31:08 +01:00

52 lines
878 B
Text

program test()
var a := { 1,12,3,32,57 };
print( "initial" );
foreach i in a
print( i );
endforeach
print( "size: " + a.size() );
print( "shrink(17)" );
a.shrink( 17 );
foreach i in a
print( i );
endforeach
print( "size: " + a.size() );
print( "shrink(6)" );
a.shrink( 6 );
foreach i in a
print( i );
endforeach
print( "size: " + a.size() );
print( "shrink(5)" );
a.shrink( 5 );
foreach i in a
print( i );
endforeach
print( "size: " + a.size() );
print( "shrink(3)" );
a.shrink( 3 );
foreach i in a
print( i );
endforeach
print( "size: " + a.size() );
print( "shrink(0)" );
a.shrink( 0 );
foreach i in a
print( i );
endforeach
print( "size: " + a.size() );
endprogram
/**** Expected Output Begins: *****
1
12
3
32
57
***** Expected Output Ends ****/