#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

MODULE = My::Games::Azure::Unit   PACKAGE = My::Games::Azure::Unit
PROTOTYPES: DISABLE

void
world_location(self)
HV *self
PREINIT:
  SV **x, **y;
PPCODE:
  x = hv_fetch( self, "x", 1, 0 );
  y = hv_fetch( self, "y", 1, 0 );
  EXTEND(SP, 2);
  PUSHs(x ? *x : &PL_sv_undef);
  PUSHs(y ? *y : &PL_sv_undef);