Buchempfehlung
Visual Basic 6 Kochbuch
Visual Basic 6 Kochbuch
Viele praktische Tipps zum Programmieren mit Visual Basic 6, die sich oft auch auf FB übertragen lassen. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

8.2: Mutex-Fehler im rekursiven Aufruf

Uploader:Redakteurnemored
Datum/Zeit:09.10.2011 21:38:34
Hinweis: Dieser Quelltext ist Bestandteil des Projekts OpenBook: 2D-Spieleprogrammierung, zu dem es auf FreeBASIC-Portal.de eine Projektseite gibt.

' *** CODE 8.2: Mutex-Fehler im rekursiven Aufruf

FUNCTION fehlerhafteRekursion(zahl AS INTEGER) AS INTEGER
  DIM AS INTEGER rueckgabe
  MUTEXLOCK einMutex             ' Schutz der Variablen 'param'
  IF zahl > param THEN
    ' ACHTUNG: der naechste Aufruf wird fuer Probleme sorgen!
    rueckgabe = fehlerhafteRekursion(zahl - param)
  ELSE
    rueckgabe = zahl
  END IF
  MUTEXUNLOCK einMutex
  RETURN rueckgabe
END FUNCTION