/* * common.ch — Five compatibility shim for Harbour's common.ch * * Harbour ships #translate-based aliases for ISNIL / ISARRAY / * ISNUMBER / ISCHARACTER / ISLOGICAL / ISDATE / ISBLOCK / ISMEMO / * ISOBJECT. Five registers those as direct RTL symbols in * hbrtl/register.go (each points at the same Go function as its * HB_IS* twin), so they work without any preprocessor translation * and without this include. * * This header stays as a stub so `#include "common.ch"` in ported * Harbour code doesn't error. The DEFAULT / UPDATE #xcommand forms * from Harbour's common.ch are not yet supported — use explicit * `IF xVar == NIL ; xVar := default ; ENDIF` until the preprocessor's * #xcommand marker handling is extended. */ #ifndef HB_COMMON_CH_ #define HB_COMMON_CH_ #define TRUE .T. #define FALSE .F. #define YES .T. #define NO .F. #endif