On Mon, 30 Apr 2018, Anthony Walter wrote:

Okay, I found a nice work around to allow for circular references on record
types:

record helpers

type
 JSValue = record
 ...
 end;

 JSObject = record
 ...
 end;

 JSValueHelper = record helper for JSValue
   function AsObject: JSObject;
 end;

 JSObjectHelper= record helper for JSObject
   function GetProperty(const Name: string): JSValue;
   procedure SetProperty(const Name: string; Value: JSValue);
 end;


Clever thinking :)

Michael.
_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to