View Issue Details

IDProjectCategoryView StatusLast Update
0036823LazarusIDEpublic2020-03-25 09:22
ReporterdelfionAssigned ToJuha Manninen 
PrioritynormalSeverityminorReproducibilityalways
Status resolvedResolutionfixed 
Product VersionProduct Build 
Target VersionFixed in Version 
Summary0036823: jcf fails deprecated-directive with message
Descriptionprocedure foo; deprecated 'hello';
begin
end;

Patch attached.
TagsNo tags attached.
Fixed in Revisionr62805
LazTarget-
Widgetset
Attached Files
  • deprecated.diff (627 bytes)
    Index: components/jcf2/Parse/BuildParseTree.pas
    ===================================================================
    --- components/jcf2/Parse/BuildParseTree.pas	(revision 62804)
    +++ components/jcf2/Parse/BuildParseTree.pas	(working copy)
    @@ -4018,6 +4018,12 @@
             begin
               Recognise(ttEnumerator);
               RecogniseIdentifier(False, idStrict);
    +        end;
    +        ttDeprecated:
    +        begin
    +          Recognise(ttDeprecated);
    +          if fcTokenList.FirstSolidTokenType <> ttSemicolon then
    +            RecogniseConstantExpression;
             end
             else
               Recognise(ProcedureDirectives);
    
    deprecated.diff (627 bytes)

Activities

delfion

2020-03-25 08:44

reporter  

deprecated.diff (627 bytes)
Index: components/jcf2/Parse/BuildParseTree.pas
===================================================================
--- components/jcf2/Parse/BuildParseTree.pas	(revision 62804)
+++ components/jcf2/Parse/BuildParseTree.pas	(working copy)
@@ -4018,6 +4018,12 @@
         begin
           Recognise(ttEnumerator);
           RecogniseIdentifier(False, idStrict);
+        end;
+        ttDeprecated:
+        begin
+          Recognise(ttDeprecated);
+          if fcTokenList.FirstSolidTokenType <> ttSemicolon then
+            RecogniseConstantExpression;
         end
         else
           Recognise(ProcedureDirectives);
deprecated.diff (627 bytes)

Juha Manninen

2020-03-25 09:22

developer   ~0121702

Applied, thanks.

Issue History

Date Modified Username Field Change
2020-03-25 08:44 delfion New Issue
2020-03-25 08:44 delfion File Added: deprecated.diff
2020-03-25 09:16 Juha Manninen Assigned To => Juha Manninen
2020-03-25 09:16 Juha Manninen Status new => assigned
2020-03-25 09:22 Juha Manninen Status assigned => resolved
2020-03-25 09:22 Juha Manninen Resolution open => fixed
2020-03-25 09:22 Juha Manninen Fixed in Revision => r62805
2020-03-25 09:22 Juha Manninen LazTarget => -
2020-03-25 09:22 Juha Manninen Note Added: 0121702