view release on metacpan or  search on metacpan

src/Core/objects/Event.xs  view on Meta::CPAN

			a->code = SvUV( ST(1) );
		}

		RETVAL = (int)a->code;
	OUTPUT:
		RETVAL

SV*
event_user_data1 ( event, ... )
	SDL_Event *event	
	PPCODE: 
		SDL_UserEvent * a = &(event->user);
		if ( items > 1)
			a->data1 = new_data( ST(1) ); 
		 if (!a->data1)
		  XSRETURN_EMPTY;
		  ST(0) = a->data1;
		  XSRETURN(1);

SV*
event_user_data2 ( event, ... ) 
	SDL_Event *event	
	PPCODE: 
		SDL_UserEvent * a = &(event->user);
		if ( items > 1)
			a->data2 = new_data( ST(1) ); 
		 if (!a->data2)
		  XSRETURN_EMPTY;
		  ST(0) = a->data2;
		  XSRETURN(1);

SDL_SysWMEvent *
event_syswm ( event, ... )

src/SDLx/Validate.xs  view on Meta::CPAN

val_list_rgba( color )
    SV *color
    CODE:
        RETVAL = __list_rgba( color );
    OUTPUT:
        RETVAL

void
val_rect( r )
    SV* r
    PPCODE:
        ST(0) = create_mortal_rect( r );
        XSRETURN(1);

void *
val_surface( s )
    SV *s
    PPCODE:
        assert_surface(s); /* ok or dead */
        /* ret is already mortal */
        ST(0) = s;
        XSRETURN(1);

SV *
val_map_rgb( color, format)
    SV* color
    SDL_PixelFormat * format
    CODE: