fcl-passrc and preprocessing

[steve64]

It seems that fcl-passrc implements preprocessing for directives like $ifdef $if $elif $else.. $endif
However, I would like to have a way to define custom symbols inside the following function:

function ParseSource(AEngine: TPasTreeContainer;
                     const FPCCommandLine : Array of String;
                     OSTarget, CPUTarget: String;
                     Options : TParseSourceOptions): TPasModule;     

Any code example for this?

[simone]

I've used fcl-passrc extensively in the past, not recently. Therefore my knowledge is not fresh and I would need to re-read my old code.

However, hoping to be useful anyway, I believe you have to use the TPascalScanner.AddDefine method, related to the scanner associated with the parser.

If you take a look at the library code you have usage examples:

https://gitlab.com/freepascal.org/fpc/source/-/blob/main/packages/fcl-passrc/src/pparser.pp?ref_type=heads#L831