### ----------------------------------------------------
### -- Gnome::Glib
### -- Licenses: Artistic-2.0
### -- Authors: Marcel Timmerman
### -- File: t/SList.rakutest
### ----------------------------------------------------
use v6;
#use lib '../gnome-native/lib';
use NativeCall;
use Test;

use Gnome::Glib::SList:api<1>;

#use Gnome::N::X:api<1>;
#Gnome::N::debug(:on);

#-------------------------------------------------------------------------------
my Gnome::Glib::SList $s .= new;
#-------------------------------------------------------------------------------
subtest 'ISA test', {
  isa-ok $s, Gnome::Glib::SList;
  ok $s.is-valid, '.is-valid()';
}

#-------------------------------------------------------------------------------
subtest 'Manipulations', {
  is $s.g-slist-length, 0, 'List has no elements';
}

#-------------------------------------------------------------------------------
done-testing;


