Diff for /parser3/tests/256.html between versions 1.2 and 1.10

version 1.2, 2010/10/12 21:37:37 version 1.10, 2024/10/02 23:04:05
Line 1 Line 1
 @main[]  @main[]
 $a[^hash::create[]]  $a[^hash::create[]]
 $b[$.a[$a]]  $b[$.a[$a]]
 $a.b[$b]  $a.b[$b]
Line 24  $h[ Line 24  $h[
         ]          ]
   
         $.date[          $.date[
                 $.value[^date::create(2006;08;18;06;09;00)]                  $.value[^date::create(2026;08;18;06;09;00)]
   
                 $._options[                  $._options[
                         $.0[$.date[unix-timestamp]]                          $.0[$.date[unix-timestamp]]
                         $.1[$.date[gmt-string]]                          $.1[$.date[gmt-string]]
                         $.2[$.date[sql-string]]                          $.2[$.date[iso-string]]
                         $.3[$.date[$handler]]                          $.3[$.date[sql-string]]
                           $.4[$.date[$handler]]
                           $.5[
                                   $.date[unsupported]
                                   $.exception(true)
                           ]
                 ]                  ]
         ]          ]
   
Line 48  $h[ Line 53  $h[
                         $.1[$.table[object] $.indent(true)]                          $.1[$.table[object] $.indent(true)]
                         $.2[$.table[array]]                          $.2[$.table[array]]
                         $.3[$.table[array] $.indent(true)]                          $.3[$.table[array] $.indent(true)]
                           $.4[$.table[compact]]
                           $.5[$.table[compact] $.indent(true)]
                           $.6[
                                   $.table[unsupported]
                                   $.exception(true)
                           ]
                 ]                  ]
         ]          ]
   
Line 56  $h[ Line 67  $h[
   
                 $._options[                  $._options[
                         $.0[$.my[$handler]]                          $.0[$.my[$handler]]
                           $.1[
                                   $.my[$unknown]
                                   $.exception(true)
                           ]
                           $.2[
                                   $.my[$main]
                                   $.exception(true)
                           ]
                 ]                  ]
         ]          ]
   
Line 68  $h[ Line 87  $h[
                         $.0[$.file[text]]                          $.0[$.file[text]]
                         $.1[$.file[base64] $.indent(true)]                          $.1[$.file[base64] $.indent(true)]
                         $.2[$.file[$handler]]                          $.2[$.file[$handler]]
                           $.3[$.file[stat]]
                           $.4[
                                   $.file[unsupported]
                                   $.exception(true)
                           ]
                 ]                  ]
         ]          ]
   
         $.image[          $.image[
                 $.value[^image::create(100;100;0)]                  $.value[^image::create(100;100;0)]
                 $._options[                  $._options[
                         $.0[$.skip-unknown(true)]  
                         $.1[$.image[$handler]]                          $.1[$.image[$handler]]
                         $.2[$.exception(true)]                          $.2[$.exception(false)]
                 ]                  ]
         ]          ]
   
Line 88  $h[ Line 111  $h[
                 ]                  ]
         ]          ]
   
           $.xdoc[
                   $.value[^xdoc::create{<?xml version="1.0"?><r><t z="1"/></r>}]
                   $._options[
                           $.0[]
                           $.1[$.xdoc[
                                   $.omit-xml-declaration[yes]
                                   $.indent[yes]
                           ]]
                   ]
           ]
 ]  ]
   
 ^h.table.table_named_3.append{v7        v8      v9      v0}  ^h.table.table_named_3.append{v7        v8      v9      v0}
   ^h.table.table_named_3.append{vA"}
   ^h.table.table_named_3.append{vB\}
   
 $s[^h.foreach[k;v]{  $s[^h.foreach[k;v]{
         <h3>$k</h3>          <h3>$k</h3>
Line 106  $s[^h.foreach[k;v]{ Line 141  $s[^h.foreach[k;v]{
   
 ^s.match["([acm]date)":"[^^"]+"][g]{"$match.1":"-value-"}  ^s.match["([acm]date)":"[^^"]+"][g]{"$match.1":"-value-"}
   
   check large date timestamp: ^json:string[^date::create[9000-01-01]; $.date[unix-timestamp] ]
   
   
   
 @2string[value;options]  @2string[value;options]
 $options[^hash::create[$options]]  $options[^hash::create[$options]]
Line 115  $bShouldBeException($options.exception) Line 153  $bShouldBeException($options.exception)
         $result[^json:string[$value;$options]^if($bShouldBeException){. FAILED. EXCEPTION SHOULD BE HERE}]          $result[^json:string[$value;$options]^if($bShouldBeException){. FAILED. EXCEPTION SHOULD BE HERE}]
 }{  }{
         $exception.handled(true)          $exception.handled(true)
         $result[Exception^if($bShouldBeException){. That's OK} ($exception.comment)]          $result["exception":"$exception.source, ^taint[as-is;$exception.comment]^if($bShouldBeException){. That's OK}"]
 }  }
   
   
 @handler[v;p][kk;vv]  @handler[k;v;p][kk;vv]
 $result[^switch[$v.CLASS_NAME]{  $result[^switch[$v.CLASS_NAME]{
         ^case[date]{"new Date(^v.unix-timestamp[])"}          ^case[date]{"new Date(^v.unix-timestamp[])"}
         ^case[file]{{"file":{"name":"$v.name", "text":"$v.text", "params":"-params-"}}}          ^case[file]{{"file":{"name":"$v.name", "text":"$v.text", "params":"-params-"}}}
         ^case[image]{"image []"}          ^case[image]{"image []"}
         ^case[DEFAULT]{"$v.CLASS_NAME"}          ^case[DEFAULT]{"$v.CLASS_NAME at key $k, with ^p._count[] option"}
 }]  }]
   
   

Removed from v.1.2  
changed lines
  Added in v.1.10


E-mail: