Helpers.

commandNullDefines :: Command -> Command
commandNullDefines = setL cmdDefines (Name "")

p
commandNullDefines :: Command -> Command
commandNullDefines = setL cmdDefines (Name "")
commandNullDefines = setL cmdDefines (Name "")