fixed for newer perl
[tridge/junkcode.git] / null.c
1 main()
2 {
3 char *p = 0;
4 int x;
5
6 x = *(int *)p;
7 exit(x);
8 }