Orderings.bpl(8,19): Error: parent of constant has incompatible type (int instead of C)
1 type checking errors detected in Orderings.bpl