paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 04:29:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix copy-paste mistake from Mantis (due to replacement of '#' with links...)

Browse Source 
git-svn-id: trunk@47387 -
This commit is contained in:
svenbarth 2020-11-11 08:28:37 +00:00
parent 27125b760e
commit f75e6d8a48
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tests/webtbs/tw38051.pp
View File

@ -5,13 +5,13 @@ program tw38051;
const cChr = chr(12); { Ok } const cChr = chr(12); { Ok }
type Tcha = ord(3)..ord(12); { Ok } type Tcha = ord(3)..ord(12); { Ok }
type Tchz = 0000003..0000012; { Ok } type Tchz = #3..#12; { Ok }
type Tcho = char(3)..char(12);{ Ok } type Tcho = char(3)..char(12);{ Ok }
type Tchr = chr(3)..chr(12); { Error: Identifier not found "chr" } type Tchr = chr(3)..chr(12); { Error: Identifier not found "chr" }
type TArrChr = array [chr(3)..chr(12)] of char; { Ok } type TArrChr = array [chr(3)..chr(12)] of char; { Ok }
var cz : 0000003..0000012; { Ok } var cz : #3..#12; { Ok }
var ch : chr(3)..chr(12); { Error: Identifier not found "chr" } var ch : chr(3)..chr(12); { Error: Identifier not found "chr" }