use "slist.g";
use "iterator_functions.g";
use "basic_models.g";

fun main() -> int@
{
  let l = @slist<int>();
  let i = 0;
  while (i != 3) {
    push_front(2 - i, l);
    ++i;
  }
  let iter = begin(l);
  advance(iter, 2);
  if (*iter == 2 and ++iter == end(l))
    return 0;
  else
    return -1;
}