PureBasic

ProcedureDLL inittest()
  OpenConsole()
EndProcedure

ProcedureDLL test()
  PrintN("coucou")
EndProcedure

Library = OpenLibrary(#PB_Any, "C:\Program Files\PureBasic\PureLibraries\UserLibraries\test.dll")

CallFunction(Library, "inittest")

If OpenWindow(0, 10, 10, 300,200, #PB_Window_ScreenCentered ,"test librairie") 
CallFunction(Library, "test")

Repeat
  
Until WindowEvent()=#PB_Event_CloseWindow 
EndIf

flat assembler version 1.56
TBTemp\Functions\testShared.asm [5]:
Public align 4
Error: reserved word used as symbol.

Dräc a écrit : Que représente « align 4 » dans le code assembler ?
Quel est, selon vous, le remède ?

Je pense qu'un Tuto à ce sujet serait interessant

You can make your function accept variable arguments. To do so, you must include two or more ProcedureDLL's with the same name and an index number:

ProcedureDLL MyFunction(arg1, arg2)
result = Pow(arg1, arg2)
ProcedureReturn result
EndProcedure

ProcedureDLL MyFunction2(arg1, arg2, arg3)
result = Pow(arg1, arg2)/arg3
ProcedureReturn result
EndProcedure

To be considered as different versions of the same function with different argument number, the arguments names and types must coincide between them; otherwise, both functions will be considered different functions and processed that way.

After the library is made, and the compiler restarted from the PureBasic editor, if you type MyFunction( in the PureBasic editor, the status window will show:

MyFunction (arg1, arg2 [, arg3])

And you'll be able to call the function with two or three arguments. You can make as many versions as you want, with a different number of arguments, as long as you follow the mentioned rules.