X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;ds=sidebyside;f=src%2Ftools%2Fmapcvt.dpr;h=cf4edc1692b956688ccad9778d2b0cb1da648c10;hb=a560da6e723b18222283bbca8bd2cefc5692fc7c;hp=71784e27c7b9f02124177b401616b33a2e3f1fe8;hpb=ae4069ace642a386dd8651379dbfb0e6330d915b;p=d2df-sdl.git diff --git a/src/tools/mapcvt.dpr b/src/tools/mapcvt.dpr index 71784e2..cf4edc1 100644 --- a/src/tools/mapcvt.dpr +++ b/src/tools/mapcvt.dpr @@ -101,7 +101,7 @@ begin stt := curTimeMicro(); map := dfmapdef.parseBinMap(st); stt := curTimeMicro()-stt; - writeln('binary map parsed in ', stt div 1000, '.', stt mod 1000, ' microseconds'); + writeln('binary map parsed in ', stt div 1000, '.', stt mod 1000, ' milliseconds'); st.Free(); end else @@ -113,7 +113,7 @@ begin stt := curTimeMicro(); map := dfmapdef.parseMap(pr); stt := curTimeMicro()-stt; - writeln('text map parsed in ', stt div 1000, '.', stt mod 1000, ' microseconds'); + writeln('text map parsed in ', stt div 1000, '.', stt mod 1000, ' milliseconds'); except on e: Exception do begin writeln('ERROR at (', pr.line, ',', pr.col, '): ', e.message); @@ -133,7 +133,7 @@ begin stt := curTimeMicro(); map.writeBinTo(st); stt := curTimeMicro()-stt; - writeln('binary map written in ', stt div 1000, '.', stt mod 1000, ' microseconds'); + writeln('binary map written in ', stt div 1000, '.', stt mod 1000, ' milliseconds'); end else begin @@ -142,7 +142,7 @@ begin stt := curTimeMicro(); map.writeTo(wr); stt := curTimeMicro()-stt; - writeln('text map written in ', stt div 1000, '.', stt mod 1000, ' microseconds'); + writeln('text map written in ', stt div 1000, '.', stt mod 1000, ' milliseconds'); wr.Free(); end; end.