701 xs->head("properties"); |
701 xs->head("properties"); |
702 // Print it as a java-style property list. |
702 // Print it as a java-style property list. |
703 // System properties don't generally contain newlines, so don't bother with unparsing. |
703 // System properties don't generally contain newlines, so don't bother with unparsing. |
704 outputStream *text = xs->text(); |
704 outputStream *text = xs->text(); |
705 for (SystemProperty* p = Arguments::system_properties(); p != NULL; p = p->next()) { |
705 for (SystemProperty* p = Arguments::system_properties(); p != NULL; p = p->next()) { |
706 // Print in two stages to avoid problems with long |
|
707 // keys/values. |
|
708 assert(p->key() != NULL, "p->key() is NULL"); |
706 assert(p->key() != NULL, "p->key() is NULL"); |
709 text->print_raw(p->key()); |
707 if (p->is_readable()) { |
710 text->put('='); |
708 // Print in two stages to avoid problems with long |
711 assert(p->value() != NULL, "p->value() is NULL"); |
709 // keys/values. |
712 text->print_raw_cr(p->value()); |
710 text->print_raw(p->key()); |
|
711 text->put('='); |
|
712 assert(p->value() != NULL, "p->value() is NULL"); |
|
713 text->print_raw_cr(p->value()); |
|
714 } |
713 } |
715 } |
714 xs->tail("properties"); |
716 xs->tail("properties"); |
715 } |
717 } |
716 xs->tail("vm_arguments"); |
718 xs->tail("vm_arguments"); |
717 // tty output per se is grouped under the <tty>...</tty> element. |
719 // tty output per se is grouped under the <tty>...</tty> element. |