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;
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
