git.sur5r.net Git - cc65/blob - test/val/bss-name.c

   1 /*
   2   !!DESCRIPTION!! bss-name pragma
   3   !!ORIGIN!!      cc65 regression tests
   4   !!LICENCE!!     Public Domain
   5   !!AUTHOR!!      Piotr Fusik
   6 */
   7
   8 /*
   9   see: https://github.com/cc65/cc65/issues/409
  10 */
  11
  12 #pragma bss-name (push,"ZEROPAGE")
  13
  14 char zp_var;
  15
  16 #pragma bss-name (pop)
  17
  18 int main(void)
  19 {
  20     return (unsigned) &zp_var < 0x100 ? 0 : 1;
  21 }