SCM: define-cond-expand-feature debug (part-cw#392)

This enables compile-time instrumentation/alteration of code depending on the configured options. 

Note: This definition uses lower case debug in Scheme, while we use DEBUG in C.

Author: 0-8-15

languages/scm.sh

@@ -56,6 +56,7 @@ compile_payload_scm()
     # prep the compiler options
     if [ $SYS_MODE = "debug" ]; then
       scm_opts="(declare (standard-bindings)(extended-bindings)(debug)(debug-location))"
+      scm_opts="${scm_opts}(define-cond-expand-feature debug)"
       payload_cdefs="$payload_cdefs -D___LIBRARY -D___PRIMAL"
     else
       scm_opts="(declare (block)(not safe)(standard-bindings)(extended-bindings))"