C02/test/const.c02

/* Test C02 define directive */

#pragma origin 1000

const #TRUE = $FF, #FALSE = 0;

const #BITS = %01010101;
const #ZED = 'Z';

enum {SOLO};
enum {BLACK, WHITE, RED, CYAN, PURPLE, GREEN, BLUE, YELLOW};
enum {NONE, FIRST, SECOND, THIRD};
enum {ZERO, ONE, TWO, THREE, FOUR, FIVE, SIX, SEVEN, EIGHT, NINE, TEN};

char a = {#TRUE, #FALSE};
char b;
char f = #FALSE;
char t = #TRUE;

b = #TRUE;