12 lines
120 B
Perl
12 lines
120 B
Perl
a=1:b=1:c=1
|
|
t0=millis(1)
|
|
for j=1,1000 {
|
|
for i=1,10000 {
|
|
a=a+1
|
|
b=b+1
|
|
c=c+1
|
|
}
|
|
}
|
|
t1=millis(1)
|
|
! t1-t0,"ms"
|