The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

MODULE = XSWarn		PACKAGE = XSWarn	PREFIX = xswarn_

PROTOTYPES: DISABLE

void
xswarn_nonargs()
# see perl #112776
    SV *sv = sv_2mortal(newSV());
  CODE:
    ;