jcf fails on >< Symmetric difference of two sets
Original Reporter info from Mantis: BrunoK
-
Reporter name:
Original Reporter info from Mantis: BrunoK
- Reporter name:
Description:
type
TSetDisjoin = (sdja,
sdjb);
TSetDisjoins = set of TSetDisjoin;
var
lSetDisjoinA, lSetDisjoinB: TSetDisjoins;
begin
lSetDisjoinA := lSetDisjoinA >< lSetDisjoinB;
end.
Additional information:
This patch is a subset of my current version of JCF formatter, some changes in this where made because I find them more understandable for working on the units.
If requested I could also pass other changes re :
special compiler directives :
- // VarDecl -> IdentList ':' Type [(ABSOLUTE (Ident | ConstExpr)) | '=' ConstExpr]
+ // (* attempted EBNF definition of a variable definition *)
+ // named : 'name' var_name
+ // exppubl : ( 'export' | 'public' ) [named] ';'
+ // external : ( 'external' [[lib_name] [named]] ';'
+ // absolute : 'absolute' var_name
+ // initvalue : '=' ConstExpr
+ // hints : [ 'deprecated'
+ // | 'experimental'
+ // | 'platform'
+ // | 'unimplemented' ]
+ // identlist : var_name { ',' var_name }
+ //
+ // vardef : identlist ':' vartype [ absolute ] ';'
+ // [( exppubl | external )] [ hints ]
compilerproc, alias,
attempted JCF on include files ( not very satisfactory for blind formatting ).