     (word.ws or '') + colorize(theme[labelOf word], symbol)
 
 labelOf = (word) ->
-  word.label or 'normal'
+  word.malformed and 'malformed' or word.label or 'normal'
 
 collapse = (nodes) ->
   collapsed = ""

    methodsDeclarations = definitionList ctx,
      (prefixWithInstanceName definitions, instanceName)
    ctx.closeScope()

    methods = map (({rhs}) -> rhs), methodsDeclarations
    # log "methods", methods


    #log "ASSIGN #{ctx.definitionName()}", ctx.shouldDefer()
    if ctx.shouldDefer()
      return deferCurrentDefinition ctx, expression

    if assigns.length is 0
      return malformed to, 'Not an assignable pattern'
    map compileVariableAssignment, (join translationCache, assigns)
  else
    translatedExpression

# Pushes the deferring to the parent scope
deferCurrentDefinition = (ctx, expression) ->
  ctx.addDeferredDefinition ctx.deferReason().concat [ctx.definitionPattern(), expression]
  deferredExpression()

polymorphicAssignCompile = (ctx, expression, translatedExpression) ->
  assignCompileAs ctx, expression, translatedExpression, yes
