|
Ответ: Великая битва 4х языков программирования на простейшей задачке
Мой тест на BlitzMax:
SuperStrict
Framework brl.basic
Import brl.standardio
Local allocStart:Int = MilliSecs()
Local voxelData:Int[512, 128, 512]
Local allocStop:Int = MilliSecs()
Local alloc:Int = allocStop - allocStart
Print "alloc: " + alloc + " ms"
Local counter:Int = 0
Local fillStart:Int = MilliSecs()
For Local i:Int = 0 Until 20
For Local x:Int = 0 Until 512
For Local y:Int = 0 Until 128
For Local z:Int = 0 Until 512
voxelData[x, y, z] = counter
counter = counter + 1
Next
Next
Next
Next
Local fillStop:Int = MilliSecs()
Local fill:Int = (fillStop - fillStart) / 20
Print "fill: " + fill + " ms"
Input("press any key")
Alloc: 178ms
Fill: 258ms
Машина для теста:
AMD Athlon 1.81GHz
1Gb RAM
Windows 7 x86
__________________
Retry, Abort, Ignore? █
Intel Core i7-9700 4.70 Ghz; 64Gb; Nvidia RTX 4090 3070
AMD Ryzen 7 3800X 4.3Ghz; 64Gb; Nvidia 1070Ti
AMD Ryzen 7 1700X 3.4Ghz; 8Gb; AMD RX 570
AMD Athlon II 2.6Ghz; 8Gb; Nvidia GTX 750 Ti
|