diff --git a/pform_dump.cc b/pform_dump.cc
index 5b70b99d0..20b4af97e 100644
--- a/pform_dump.cc
+++ b/pform_dump.cc
@@ -884,15 +884,19 @@ void PCase::dump(ostream&out, unsigned ind) const
       for (unsigned idx = 0 ;  idx < items_->count() ;  idx += 1) {
 	    PCase::Item*cur = (*items_)[idx];
 
-	    if (! cur->expr.empty()) {
+	    if (cur->expr.empty()) {
 		  out << setw(ind+2) << "" << "default:";
 
 	    } else {
 		  list<PExpr*>::iterator idx_exp = cur->expr.begin();
-		  out << setw(ind+2) << "" << *idx_exp;
+		  out << setw(ind+2) << "";
+		  (*idx_exp)->dump(out);
+
+		  for (++idx_exp ; idx_exp != cur->expr.end() ; ++idx_exp) {
+			out << ", ";
+			(*idx_exp)->dump(out);
+		  }
 
-		  for( ; idx_exp != cur->expr.end() ; ++idx_exp)
-			out << ", " << *idx_exp;
 
 		  out << ":";
 	    }