File: ClutterStageManager.xs

package info (click to toggle)
clutter-perl 0.8.0.1-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 652 kB
  • ctags: 42
  • sloc: perl: 645; ansic: 30; makefile: 3
file content (29 lines) | stat: -rw-r--r-- 832 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
#include "clutterperl.h"

#include <clutter/clutter-stage-manager.h>

MODULE = Clutter::StageManager  PACKAGE = Clutter::StageManager PREFIX = clutter_stage_manager_

ClutterStageManager_noinc *
clutter_stage_manager_get_default (SV *class)
    C_ARGS:
        /* void */

void
clutter_stage_manager_set_default_stage (manager, stage)
        ClutterStageManager *manager
        ClutterStage *stage

ClutterStage *
clutter_stage_manager_get_default_stage (ClutterStageManager *manager)

void
clutter_stage_manager_list_stages (ClutterStageManager *manager)
    PREINIT:
        GSList *stages, *l;
    PPCODE:
        stages = clutter_stage_manager_list_stages (manager);
        for (l = stages; l != NULL; l = l->next) {
                XPUSHs (sv_2mortal (newSVClutterStage (l->data)));
        }
        g_slist_free (stages);