Static linking

[jj2007]

What's wrong here? Why do I get "error: undefined reference to `MBRAND@8'"? With C, the library works fine...

Code: Select all

#Include "PCG32II.bas"
#inclib "MbRand"		' MbRand.a is a Windows *.lib file

Dim As pcg32 pcg
Dim As ULong i
Print "Rand"
For i = 1 To 6
  Print pcg.rand
Next

Print "Rand"
For i = 1 To 6
  Print pcg.rand
Next

Declare Function MbRand(byval bytes as Integer, byval seed As Integer) As Long Ptr
' error: undefined reference to `MBRAND@8'
Dim MyNumbers as Long ptr=MbRand(1000, 0)

Sleep

[srvaldez]

hi jj2007
try extern "Windows" or extern "Windows-MS" (or Extern "C" if it's calling convention is cdecl) in your declare, example

Code: Select all

Extern "Windows"
	Declare Function MbRand(byval bytes as Integer, byval seed As Integer) As Long Ptr
End Extern

when using extern the symbol case is preserved so it's not up-cased like MBRAND@8