Check-in [6e66345ea7]
Overview
Comment:Removed stringify code
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:6e66345ea7d6677a65668fdedf1cd0bc73ea99bf
User & Date: rkeene on 2010-09-26 19:39:23
Other Links: manifest | tags
Context
2010-09-26
22:52
Updated logo, again check-in: a0a0e8ad2c user: rkeene tags: trunk
19:39
Removed stringify code check-in: 6e66345ea7 user: rkeene tags: trunk
19:26
Updated logo check-in: 5074d303a3 user: rkeene tags: trunk
Changes

Deleted kitdll/buildsrc/kitdll-0.0/stringify.tcl version [07e25e6903].

     1         -#! /usr/bin/env tclsh
     2         -
     3         -proc stringifyfile {filename {key 0}} {
     4         -	catch {
     5         -		set fd [open $filename r]
     6         -	}
     7         -
     8         -	if {![info exists fd]} {
     9         -		return ""
    10         -	}
    11         -
    12         -	set data [read -nonewline $fd]
    13         -	close $fd
    14         -
    15         -	foreach line [split $data \n] {
    16         -		set line [string map [list "\\" "\\\\" "\"" "\\\""] $line]
    17         -		append ret "	\"$line\\n\"\n"
    18         -	}
    19         -
    20         -	return $ret
    21         -}
    22         -
    23         -foreach file $argv {
    24         -	puts -nonewline [stringifyfile $file]
    25         -}
    26         -
    27         -exit 0