diff options
Diffstat (limited to 'tkimg/xbm/tests/xbm.test')
-rw-r--r-- | tkimg/xbm/tests/xbm.test | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/tkimg/xbm/tests/xbm.test b/tkimg/xbm/tests/xbm.test deleted file mode 100644 index 8c1375e..0000000 --- a/tkimg/xbm/tests/xbm.test +++ /dev/null @@ -1,26 +0,0 @@ -# This file is a Tcl script to test out XBM reading and writing. -# It is organized in the standard fashion for Tcl tests. -# - -puts "img::xbm [package require img::xbm]" - -test xbm-1.1 {} { - catch {image delete i} - image create photo i -file [file join $tcltest::testsDirectory folder.xbm] - i data -format xbm -} {#define InlineData_width 16 -#define InlineData_height 12 -static char InlineData_bits[] = { - 0x78, 0x00, - 0x86, 0x55, - 0x02, 0x01, - 0xff, 0x5f, - 0x01, 0x30, - 0x01, 0x50, - 0x01, 0x10, - 0x01, 0x50, - 0x01, 0x10, - 0x01, 0x50, - 0x01, 0x30, - 0xff, 0x1f}; -} |