Prob: Löschen in Cursorverkettete Liste

void entfernen(G & g, P p) {

 delMem(g.grupp,p);
 P tmp=get(g.grupp,p).cursor;
 get(g.grupp, p-1).cursor=tmp;
 g.akt--;
 }

void delMem(M & m, P p) { m.frei[p]='f'; }
KN & get(M & m, P p){return m.gr[p];}

typedef int P;

struct KN
{ S st;
 P cursor;
};
struct M
{ //DS ist Feld
 static const int maxAnz = 7;
 KN gr[maxAnz];
 char frei[maxAnz];
};

void entfernen(G & g, P p) {


 for (int i=p;get(g.grupp,i).cursor != g.letzt; i=get(g.grupp,i).cursor)
 {

 S tmp=get(g.grupp,i+1).st; //Verschieben um eine Pos
 get(g.grupp, i).st=tmp;
 }

 delMem(g.grupp,ende(g)); //Speicherplatz leeren
 get(g.grupp,g.akt).cursor=g.letzt; //neue letzte Pos
 g.akt--; //akt.Anz Knoten verringern

 }