# This file is a Tcl script to test new object types in Tk.
# It is organized in the standard fashion for Tcl tests.
#
# Copyright (c) 1997 Sun Microsystems, Inc.
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
# RCS: @(#) $Id: obj.test,v 1.2 1999/04/16 01:51:39 stanton Exp $

if {[lsearch [namespace children] ::tcltest] == -1} {
    source [file join [pwd] [file dirname [info script]] defs.tcl]
}

foreach i [winfo children .] {
    destroy $i
}
wm geometry . {}
raise .

test obj-1.1 {TkGetPixelsFromObj} {
} {}

test obj-2.1 {FreePixelInternalRep} {
} {}

test obj-3.1 {DupPixelInternalRep} {
} {}

test obj-4.1 {SetPixelFromAny} {
} {}



eval destroy [winfo children .]

# cleanup
::tcltest::cleanupTests
return














orm method='get' action=''>
<input type='hidden' name='id' value='8de34cdb952a2e3b8d7a9a213845cad01a8cece3'/><select name='h' onchange='this.form.submit();'>
<option value='2.7'>2.7</option>
<option value='3.3'>3.3</option>
<option value='3.4'>3.4</option>
<option value='3.5'>3.5</option>
<option value='3.6'>3.6</option>
<option value='benjamin-clang'>benjamin-clang</option>
<option value='benjamin-iteration-torture'>benjamin-iteration-torture</option>
<option value='buildbot-custom'>buildbot-custom</option>
<option value='master'>master</option>
</select> <input type='submit' name='' value='switch'/></form></td></tr>
<tr><td class='sub'>https://github.com/python/cpython.git</td><td class='sub right'></td></tr></table>
<table class='tabs'><tr><td>
<a href='/oss-git/cpython.git/?h=v3.9.18'>summary</a><a href='/oss-git/cpython.git/refs/?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>refs</a><a href='/oss-git/cpython.git/log/Parser/pegen/parse.c?h=v3.9.18'>log</a><a href='/oss-git/cpython.git/tree/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>tree</a><a class='active' href='/oss-git/cpython.git/commit/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>commit</a><a href='/oss-git/cpython.git/diff/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>diff</a><a href='/oss-git/cpython.git/stats/Parser/pegen/parse.c?h=v3.9.18'>stats</a></td><td class='form'><form class='right' method='get' action='/oss-git/cpython.git/log/Parser/pegen/parse.c'>
<input type='hidden' name='h' value='v3.9.18'/><input type='hidden' name='id' value='8de34cdb952a2e3b8d7a9a213845cad01a8cece3'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='text' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/oss-git/cpython.git/commit/?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>root</a>/<a href='/oss-git/cpython.git/commit/Parser?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>Parser</a>/<a href='/oss-git/cpython.git/commit/Parser/pegen?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>pegen</a>/<a href='/oss-git/cpython.git/commit/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>parse.c</a></div><div class='content'><div class='cgit-panel'><b>diff options</b><form method='get' action='.'><input type='hidden' name='h' value='v3.9.18'/><input type='hidden' name='id' value='8de34cdb952a2e3b8d7a9a213845cad01a8cece3'/><table><tr><td colspan='2'/></tr><tr><td class='label'>context:</td><td class='ctrl'><select name='context' onchange='this.form.submit();'><option value='1'>1</option><option value='2'>2</option><option value='3' selected='selected'>3</option><option value='4'>4</option><option value='5'>5</option><option value='6'>6</option><option value='7'>7</option><option value='8'>8</option><option value='9'>9</option><option value='10'>10</option><option value='15'>15</option><option value='20'>20</option><option value='25'>25</option><option value='30'>30</option><option value='35'>35</option><option value='40'>40</option></select></td></tr><tr><td class='label'>space:</td><td class='ctrl'><select name='ignorews' onchange='this.form.submit();'><option value='0' selected='selected'>include</option><option value='1'>ignore</option></select></td></tr><tr><td class='label'>mode:</td><td class='ctrl'><select name='dt' onchange='this.form.submit();'><option value='0' selected='selected'>unified</option><option value='1'>ssdiff</option><option value='2'>stat only</option></select></td></tr><tr><td/><td class='ctrl'><noscript><input type='submit' value='reload'/></noscript></td></tr></table></form></div><table summary='commit info' class='commit-info'>
<tr><th>author</th><td>Pablo Galindo &lt;Pablogsal@gmail.com&gt;</td><td class='right'>2020-09-02 20:30:51 (GMT)</td></tr>
<tr><th>committer</th><td>GitHub &lt;noreply@github.com&gt;</td><td class='right'>2020-09-02 20:30:51 (GMT)</td></tr>
<tr><th>commit</th><td colspan='2' class='sha1'><a href='/oss-git/cpython.git/commit/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>8de34cdb952a2e3b8d7a9a213845cad01a8cece3</a> (<a href='/oss-git/cpython.git/patch/Parser/pegen/parse.c?id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>patch</a>)</td></tr>
<tr><th>tree</th><td colspan='2' class='sha1'><a href='/oss-git/cpython.git/tree/?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>539f50127a5a8c0e42983eec54687e0b3c41b30a</a> /<a href='/oss-git/cpython.git/tree/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3'>Parser/pegen/parse.c</a></td></tr>
<tr><th>parent</th><td colspan='2' class='sha1'><a href='/oss-git/cpython.git/commit/Parser/pegen/parse.c?h=v3.9.18&amp;id=a763ee3c583e6a2dfe1b1ac0600a48e8a978ed50'>a763ee3c583e6a2dfe1b1ac0600a48e8a978ed50</a> (<a href='/oss-git/cpython.git/diff/Parser/pegen/parse.c?h=v3.9.18&amp;id=8de34cdb952a2e3b8d7a9a213845cad01a8cece3&amp;id2=a763ee3c583e6a2dfe1b1ac0600a48e8a978ed50'>diff</a>)</td></tr><tr><th>download</th><td colspan='2' class='sha1'>