Unbegrenzte Parameteranzahl

[Mok]

Tach auch!
bei der C-Funktion fprintf() kann man nach den *FILE und const char* Parametern ja beliebig viele Variablen angeben, die dann mit den %Zeichen ausgegeben werden. Geht sowas auch in PureBasic (ohne Arrays und Co.)?
Grüße, Mok

[STARGÅTE]

leider nicht nativ.

ich hatte dazu ein Macr geschrieben:
DimP - Viele ProcedurParameter (max 16) als Array verwenden

Da kannst du dann unbestimmt viele Parameter übergeben (max 16) welche dann in der procedure als Array vorliegen.

[Josh]

nur wenn du unendlich viele parameter mit standardwert reinschreibst.
wird aber etwas mühselig werden ^^

p.s.: keine gewähr, ob die anzahl der parameter in pb begrenzt ist

[Blackskyliner]

Ich hatte solche Probleme über ein temporäres Array gelöst... und dann bin ich halt das Array in der Funktion durchgegangen...
Warum gibt es eigentlich 100 tausend OOP Precompiler aber keinen Undefinierte Parameteranzahl, Precompiler?
Der dann einfach das Script durchgeht und schaut welcher Aufruf die meisten Parameter hat und dann entsprechend den Funktionskopf erstellt/anpasst...

MFG
Blackskyliner

[CSHW89]

Ich hatte solche Probleme über ein temporäres Array gelöst... und dann bin ich halt das Array in der Funktion durchgegangen...
Warum gibt es eigentlich 100 tausend OOP Precompiler aber keinen Undefinierte Parameteranzahl, Precompiler?
Der dann einfach das Script durchgeht und schaut welcher Aufruf die meisten Parameter hat und dann entsprechend den Funktionskopf erstellt/anpasst...

MFG
Blackskyliner

Interressant dass du das ansprichst. Ich arbeite grad an einen solchen PreCompiler. Allerdings arbeitet er mit Listen:

Code: Alles auswählen

Procedure test(a.i, b.i...)
EndProcedure
test(1)
test(1,2)
test(1,2,3)

wird zu:

Code: Alles auswählen

Procedure test(a.i, List b.i())
EndProcedure
NewList test_1.i(): test(1, test_1()): FreeList(test_1())
NewList test_2.i(): AddElement(test_2()): test_2() = 2: test(1, test_2()): FreeList(test_2())
NewList test_3.i(): AddElement(test_3()): test_3() = 2: AddElement(test_3()): test_3() = 3: test(1, test_3()): FreeList(test_3())

[Blackskyliner]

Na da bin ich dann doch mal gespannt
Werd mich in einem Monat vielleicht auch mal an einer Implementierung versuchen, aber erst kommen Semesterprüfungen