If a type was the main variant already, then this code was trying to create it
as a variant type of an null main type, causing newly added debug info checks to
fail.  This caused a crash on dlasrt.f.