Roxen.git/ server/ etc/ modules/ RXML.pmod/ utils.pmod

2002-07-16

2002-07-16 09:24:11 by Martin Stjernholm <mast@lysator.liu.se>

• 652d447ced848746317a477c0cd6c20cc1f9918a (6 lines) (+4/-2) ^{[ Show | Annotate ]}
  Branch: 5.2

Handle mappings containing unsortable objects in format_short.

Rev: server/etc/modules/RXML.pmod/utils.pmod:1.30

7:   //!   //! Created 2000-01-21 by Martin Stjernholm   //! - //! $Id: utils.pmod,v 1.29 2002/04/03 12:02:04 mast Exp $ + //! $Id: utils.pmod,v 1.30 2002/07/16 09:24:11 mast Exp $      constant is_RXML_encodable = 1;   
40:    else if (mappingp (val)) {    res += "([";    if (sizeof (res) >= length) throw (0); -  array ind = sort (indices (val)); +  array ind = indices (val); +  catch (ind = sort (ind)); // sort might fail if there are objects without `< or `>.    for (int i = 0; i < sizeof (ind);) {    format_val (ind[i]);    res += ": ";