#
# Print out the line structs
#
define lstructs
       set $lstruct=(_FORMI_FIELD_LINES *)$arg0
       while ($lstruct)
               print *($lstruct)
               if ($lstruct->prev != 0x0)
                       if ($lstruct->prev->next != $lstruct)
                               print "WARNING: backward pointers inconsistent"
                       end
               end
               if ($lstruct->next != 0x0)
                       if ($lstruct->next->prev != $lstruct)
                               print "WARNING: forward pointers inconsistent"
                       end
               end
               set $lstruct = $lstruct->next
       end
end