Unit ok_deprecated_directive_note

Description

Warning: this symbol is deprecated: Deprecation note for unit

Test deprecated directive with and without note.

Overview

Classes, Interfaces, Objects and Records

Name Description
Class TTestClass  
Class TTestClassDeprecated1  
Class TTestClassDeprecated2  

Functions and Procedures

procedure MyProc1; deprecated 'Deprecation note for procedure with some apostrophe: '' here you go:)';
procedure MyProc2; deprecated;
procedure MyProc3; deprecated #72 #$65 'llo';

Constants

TestConstDeprecated1 = 1 deprecated 'Deprecation note for constant';
TestConstDeprecated2 = 1 deprecated;

Description

Functions and Procedures

procedure MyProc1; deprecated 'Deprecation note for procedure with some apostrophe: '' here you go:)';

Warning: this symbol is deprecated: Deprecation note for procedure with some apostrophe: ' here you go:)

 
procedure MyProc2; deprecated;

Warning: this symbol is deprecated.

 
procedure MyProc3; deprecated #72 #$65 'llo';

Warning: this symbol is deprecated: Hello

Deprecated note should say 'Hello'. Handled Ok, we convert and sum string tokens correctly.

Constants

TestConstDeprecated1 = 1 deprecated 'Deprecation note for constant';

Warning: this symbol is deprecated: Deprecation note for constant

 
TestConstDeprecated2 = 1 deprecated;

Warning: this symbol is deprecated.