ppNetDecl (NetDeclAssign t mb_strength mb_range mb_delay assignments)
  = text (show t) <+>
    mb ppDriveStrength mb_strength <+>
    mb ppExpandRange mb_range <+>
    mb ppDelay mb_delay <+>
    commasep [ ppIdent x <+> equals <+> ppExpr e
               | (x, e) <- assignments
             ] <> semi
ppNetDecl (NetDeclAssign t mb_strength mb_range mb_delay assignments)
  = text (show t) <+>
    mb ppDriveStrength mb_strength <+>
    mb ppExpandRange mb_range <+>
    mb ppDelay mb_delay <+>
    commasep [ ppIdent x <+> equals <+> ppExpr e
               | (x, e) <- assignments
             ] <> semi
ppNetDecl (NetDeclAssign t mb_strength mb_range mb_delay assignments)
  = text (show t) <+>
    mb ppDriveStrength mb_strength <+>
    mb ppExpandRange mb_range <+>
    mb ppDelay mb_delay <+>
    commasep [ ppIdent x <+> equals <+> ppExpr e
               | (x, e) <- assignments
             ] <> semi