Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-devel / 2012-03

trunk no longer compiles with -Cr

4 messages · 2 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Martin

on Win 32

Compiling .\winunits-base\src\typelib.pas
typelib.pas(371,71) Hint: Local variable "Handle" does not seem to be initialized
typelib.pas(493,33) Hint: Local variable "sl" does not seem to be initialized
typelib.pas(562,48) Hint: Local variable "sMethodName" does not seem to be initialized
typelib.pas(609,46) Hint: Local variable "sVarName" does not seem to be initialized
typelib.pas(1034,40) Hint: Local variable "senum" does not seem to be initialized
typelib.pas(1097,37) Hint: Local variable "sl" does not seem to be initialized
typelib.pas(1138,40) Hint: Local variable "slref" does not seem to be initialized
typelib.pas(1207,48) Hint: Local variable "srecordname" does not seem to be initialized
typelib.pas(1224,50) Hint: Local variable "smembername" does not seem to be initialized
typelib.pas(1346,32) Hint: Local variable "sl" does not seem to be initialized
typelib.pas(1353,48) Error: range check error while evaluating constants (-1 must be between 0 and 4294967295)

Reply by email

Ludo Brands
to Martin
Show quoted text 28 lines
Compiling .\winunits-base\src\typelib.pas typelib.pas(371,71) Hint: Local variable "Handle" does not seem to be initialized typelib.pas(493,33) Hint: Local variable "sl" does not seem to be initialized typelib.pas(562,48) Hint: Local variable "sMethodName" does not seem to be initialized typelib.pas(609,46) Hint: Local variable "sVarName" does not seem to be initialized typelib.pas(1034,40) Hint: Local variable "senum" does not seem to be initialized typelib.pas(1097,37) Hint: Local variable "sl" does not seem to be initialized typelib.pas(1138,40) Hint: Local variable "slref" does not seem to be initialized typelib.pas(1207,48) Hint: Local variable "srecordname" does not seem to be initialized typelib.pas(1224,50) Hint: Local variable "smembername" does not seem to be initialized typelib.pas(1346,32) Hint: Local variable "sl" does not seem to be initialized typelib.pas(1353,48) Error: range check error while evaluating constants (-1 must be between 0 and 4294967295)

Can you raise a mantis issue? I'll fix this. According to msdn http://msdn.microsoft.com/en-us/library/cc237755%28v=prot.10%29.aspx the function ITypeInfo::GetRefTypeOfImplType is defined as

HRESULT GetRefTypeOfImplType(
[in] UINT index,
[out] HREFTYPE* pRefType
);

index: MUST be a nonnegative integer, or -1.

Ludo

Reply by email

Martin
to Ludo Brands
Ludo Brands wrote 14 lines
> typelib.pas(1353,48) Error: range check error while > evaluating constants > (-1 must be between 0 and 4294967295) Can you raise a mantis issue? I'll fix this. According to msdn http://msdn.microsoft.com/en-us/library/cc237755%28v=prot.10%29.aspx the function ITypeInfo::GetRefTypeOfImplType is defined as HRESULT GetRefTypeOfImplType( [in] UINT index, [out] HREFTYPE* pRefType ); index: MUST be a nonnegative integer, or -1.

Done http://bugs.freepascal.org/view.php?id=21516

Reply by email