File:  [parser3project] / parser3 / tests / 312.html
Revision 1.5: download - view: text, annotated - select for diffs - revision graph
Tue Sep 24 00:18:24 2024 UTC (21 months, 1 week ago) by moko
Branches: MAIN
CVS tags: release_3_5_1, release_3_5_0, HEAD
tests updated after default endless loop limit increased, atoi error messages improved

@main[]
$t[^table::create{c1	c2	c3}]

^show[1]
^try-catch{ $t.c3[v] }

^t.insert{v0}

$copy[^table::create[$t]]
$hcopy[^t.hash[c1; $.type[table] ]]

^show[2]
$t.c3[v1]
^show[3]
$t.c1[]
^show[4]
^t.append{a	b	c	d	e}
^t.offset(-5)
^t.insert[ $.c1[v2] ]

current: ^t.line[]
^show[5]

^t.delete[]
current: ^t.line[]
^show[6]
^t.delete[]
current: ^t.line[]
^show[7]
^t.delete[]
current: ^t.line[]
^show[8]
^try-catch{ ^t.delete[] }


9: ^json:string[$copy; $.table[array] $.indent(true) ]
10: ^json:string[$hcopy; $.table[array] $.indent(true) ]

$t[^table::create[nameless]{}]

^show[n1]
^try-catch{ $t.3[v] }

^t.insert{v0}

$copy[^table::create[$t]]

^show[n2]
$t.3[v1]
^show[n3]
$t.0[]
^show[n4]

^try-catch{ $t.200000[v2] }

$t.64[v2]
^t.append[ $.0[0] $.1[1] $.5[5] ]
^show[n5]

@show[n]
$n : ^json:string[$t; $.table[array]  $.indent(true) ]

E-mail: