7 lines
88 B
Text
7 lines
88 B
Text
module Assertions;
|
|
var
|
|
a: integer;
|
|
begin
|
|
a := 40;
|
|
assert(a = 42,100)
|
|
end Assertions.
|