[c] lista non-funzionante

[Lucked]

Non riesco a capire l'errore...

 
//alloco un puntatore a struttura
lista L;

//alloco un nuovo nodo
if (allocanodo(&L,d) == ERROR)
    return ERROR;
//il campo next del nuovo nodo punta all'indirizzo del primo nodo
L-> next = *r_L;
// il primo nodo diventa L
  *r_L = L;
  return OK;
]