/**
 * @todo FIXME: this should not be here, but in libstratego-rtg.
 */
module sdf/symbol/implode
strategies

  /**
   * @type  Symbol -> Symbol
   */
  is-empty-sym = ?lit(_)
  is-empty-sym = ?cilit(_)
  is-empty-sym = ?ci-lit(_)
  is-empty-sym = ?layout()
  is-empty-sym = opt(is-empty-sym)
  is-empty-sym = cf(is-empty-sym)
  is-empty-sym = lex(is-empty-sym)
  is-empty-sym = label(id, is-empty-sym)

signature
  constructors
    cilit : String -> Tree