1*46439007SCharles.Forsyth# Benchmarking 2*46439007SCharles.Forsyth 3*46439007SCharles.ForsythBench: module 4*46439007SCharles.Forsyth{ 5*46439007SCharles.Forsyth PATH: con "$Bench"; 6*46439007SCharles.Forsyth 7*46439007SCharles.Forsyth FD: adt 8*46439007SCharles.Forsyth { 9*46439007SCharles.Forsyth fd: int; 10*46439007SCharles.Forsyth }; 11*46439007SCharles.Forsyth 12*46439007SCharles.Forsyth microsec: fn(): big; 13*46439007SCharles.Forsyth reset: fn(); 14*46439007SCharles.Forsyth read: fn(fd: ref FD, buf: array of byte, n: int): int; 15*46439007SCharles.Forsyth disablegc: fn(); 16*46439007SCharles.Forsyth enablegc: fn(); 17*46439007SCharles.Forsyth};