Einfache Zuweisung verursacht IMA
Verfasst: 21.07.2006 18:56
Hi,
beim testen einer neu geschriebenen Funktion bin ich auf diesen sehr
merkwürdigen Fehler gestoßen. Verursacht wird er anscheinent durch
das Not (*pLongA XOr *pLongB) . Wenn ich des einfach durch ein
*pLongB ersetze, funktioniert der Code problemlos.
beim testen einer neu geschriebenen Funktion bin ich auf diesen sehr
merkwürdigen Fehler gestoßen. Verursacht wird er anscheinent durch
das Not (*pLongA XOr *pLongB) . Wenn ich des einfach durch ein
*pLongB ersetze, funktioniert der Code problemlos.
Code: Alles auswählen
Structure sStruc
Str.s
Lng1.l
Lng2.l
EndStructure
Global NewList bla.sStruc()
Procedure Funktion(sBlubb.s, *pLongA.Long, *pLongB.Long)
If Not (*pLongA XOr *pLongB)
ProcedureReturn #False
Else
LastElement(bla())
If AddElement(bla())
bla()\Lng1 = *pLongA
bla()\Lng2 = *pLongB
bla()\Str = sBlubb
ProcedureReturn @bla()
Else
ProcedureReturn #False
EndIf
EndIf
EndProcedure
Debug Funktion("Test", 2, 0)