Да ладно, проверил на файле размером 190mb, время загрузки 0.09 сек:Файл 5MB загружается 15-20 сек.
[1368] Load time: 0.09s, file size: 189778220b
Код: Выделить всё
PROGRAM
INCLUDE('cjson.inc'), ONCE
MAP
INCLUDE('printf.inc'), ONCE
END
sFileName STRING(256), AUTO
sFileContent &STRING, AUTO
tmStart LONG, AUTO
tmEnd LONG, AUTO
CODE
sFileName = 'citylots.json'
tmStart = CLOCK()
sFileContent &= json::LoadFile(sFileName)
tmEnd = CLOCK()
IF NOT sFileContent &= NULL
printd('Load time: %fs, file size: %ib', (tmEnd-tmStart)/100, SIZE(sFileContent))
DISPOSE(sFileContent)
ELSE
printd('Load time: %fs, file not found', (tmEnd-tmStart)/100)
END