diff options
| author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2020-12-27 13:19:05 +0000 |
|---|---|---|
| committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2020-12-27 13:19:05 +0000 |
| commit | 0044dfaf52fa51432dc38ac829562042bef59e01 (patch) | |
| tree | 18c18df0e8cf855995ecde5ebd95a32ace8fa47a /tests/test | |
| parent | 1e9e971e47a87ddf7ea04aaea627ecff172fcd56 (diff) | |
| download | fpc-0044dfaf52fa51432dc38ac829562042bef59e01.tar.gz | |
* made exit codes unique
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@47860 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'tests/test')
| -rw-r--r-- | tests/test/tprec8.pp | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/test/tprec8.pp b/tests/test/tprec8.pp index 52d15734f3..0ad2e93692 100644 --- a/tests/test/tprec8.pp +++ b/tests/test/tprec8.pp @@ -40,19 +40,19 @@ begin halt(1); r.g := 5; if (r.g <> 5) then - halt(1); + halt(2); r.h := 65535; if (r.h <> 65535) then - halt(1); + halt(3); r.k := true; if not (r.k) then - halt(1); + halt(4); r.j := false; if r.j then - halt(1); + halt(5); if b <> 0 then - halt(1); + halt(6); if sizeof(tr) <> 13 then - halt(2); + halt(7); end. |