josephlwharton/EDO_DEV
josephlwharton/EDO_DEV
1
0
Fork 0
Code Issues 2 Pull requests Projects 1 Releases Packages Wiki Activity Actions

Add Test code

Browse source
This commit is contained in:
josephlwharton 2026-03-17 03:45:33 +00:00
commit 551549241f
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
Test code Normal file
View file

@ -0,0 +1,7 @@
class procedure TedoInfo.Error( const aMsg: String = '' );
begin
if ( aMsg = '' ) then
raise EedoInfoException.Create( SParsingError )
else
raise EedoInfoException.Create( aMsg );
end;