Unit DWSComp, method:
procedure TdwsUnit.ExposeInstanceToUnit(const AName, AClassType: String;
AInstance: TObject);
In line:
if not (typSym is TTypeSymbol) then
raise Exception.CreateFmt(UNT_DatatypeUnknown, [Name]);
variable Name contain TdwsUnit object name. IMHO should be AClassType in this
place.
Original issue reported on code.google.com by jac....@gmail.com on 14 May 2013 at 11:59
Original issue reported on code.google.com by
jac....@gmail.com
on 14 May 2013 at 11:59