Hello there

-
Hello there,

Is there any way to mark an anonymous as deprecated?

For a class type, the syntax is:

type
TDeprecated = class
end deprecated 'use XXX instead';

This won't compile:

type
TFoo = reference to function: Integer; deprecated 'use TBar instead';

Comments

  1. David NottageAugust 11, 2017 at 8:59 PM

    According to the help: "The 'hint' directives platform, deprecated, and library may be appended to any declaration". It's either a compiler bug or a doc bug :-) I notice that there's a number of times in the source where the deprecated directive is commented out for other types of declarations.

    ReplyDelete
  2. David HeffernanAugust 11, 2017 at 9:11 PM

    Does it compile by removing the semi colon before deprecated?

    ReplyDelete
  3. Agustin OrtuAugust 11, 2017 at 9:11 PM

    David Heffernan nope

    ReplyDelete
  4. Jeroen Wiert PluimersAugust 11, 2017 at 10:46 PM

    Actually you're asking about method reference types, not about anonymous methods.

    Anyway: not supported for procedure of object either.

    type
    { [dcc32 Error] ClassConstUsageConsoleProject.dpr(14): E1030 Invalid compiler directive: 'DEPRECATED' }
    TMyProcedure = procedure() of object deprecated 'do not use TMyProcedure';
    { [dcc32 Error] E1030 Invalid compiler directive: 'DEPRECATED' }
    TMyProcedure = reference to procedure() deprecated 'do not use TMyProcedure';

    ReplyDelete
  5. David HeffernanAugust 11, 2017 at 11:43 PM

    Isn't there a trick whereby you can apply deprecated in an alias declaration?

    https://stackoverflow.com/q/44437900/505088

    ReplyDelete
  6. Jeroen Wiert PluimersAugust 12, 2017 at 5:33 AM

    David Heffernan That trick works in both other cases as well:

    type
    TMyProcedureOld = procedure() of object;
    TMyProcedure = TMyProcedureOld deprecated 'do not use TMyProcedure';
    TMyReferenceOld = reference to procedure();
    TMyReference = TMyReferenceOld deprecated 'do not use TMyReference';

    ReplyDelete
  7. Agustin OrtuAugust 12, 2017 at 11:10 AM

    Jeroen Wiert Pluimers That's indeed a nice workaround. However, it won't work when using generic types, which is my case:

    // E2508 Type parameters not allowed on this type
    TFactoryOld = reference to function: T;
    TFactory = TFactoryOld deprecated;

    // works
    TFooOld = reference to function: Integer;
    TFoo = TFooOld deprecated;

    ReplyDelete
  8. CHUA Chee WeeAugust 14, 2017 at 1:52 AM

    Write a custom attribute and apply that attribute to the class. Eg, DeprecatedAttribute = class (TCustomAttribute)
    constructor Create(const DeprecatedMsg: string); end;

    [Deprecated('your message')]
    ClassDeclaration

    ReplyDelete
  9. David NottageAugust 14, 2017 at 5:45 AM

    CHUA Chee Wee How is the compiler warning generated? (which I assume Augustin is after)

    ReplyDelete
  10. Agustin OrtuAugust 14, 2017 at 6:54 AM

    Doesn't the compiler emit a warning when you annotate with an non existent attribute? Will check ASAP

    ReplyDelete
  11. CHUA Chee WeeAugust 14, 2017 at 8:43 AM

    David Nottage add deprecated to the constructor or the attribute class to remind you to look at the attribute usage.

    DeprecatedAttribute = class(TCustomAttribute)
    public
    constructor Create(const Msg: string); deprecated 'Please review attached code';
    end;

    [Deprecated('Don''t use this anymore')]
    TObsolete = reference to function: T;

    ReplyDelete

Post a Comment