| 123456789101112131415161718192021222324 |
- # text100MB.praat
- # Paul Boersma, 9 November 2008
- echo Text 100 MB:
- stopwatch
- a$ = "a"
- for i to 8
- a$ = a$ + a$ + a$ + a$ + a$ + a$ + a$ + a$ + a$ + a$
- endfor
- t = stopwatch
- printline creating: 't:3' seconds
- stopwatch
- a$ > kanweg.txt
- t = stopwatch
- printline writing: 't:3' seconds
- stopwatch
- b$ < kanweg.txt
- t = stopwatch
- printline reading: 't:3' seconds
- stopwatch
- assert a$ = b$
- t = stopwatch
- printline comparing: 't:3' seconds
- deleteFile ("kanweg.txt")
|
