mirror of
https://github.com/sqlite/sqlite.git
synced 2025-04-26 11:28:58 +03:00
95f6df5b8d
the various tarballs and ZIP archives that go on the download page. This is intended to make it easier and less error prone to put up new "draft" download pages for testing. FossilOrigin-Name: 2b17bc49655c577029919c2d409de994b0d252f8efb5da1ba0913f2c96bee552
15 lines
459 B
Tcl
15 lines
459 B
Tcl
#!/usr/bin/tclsh
|
|
#
|
|
# Build a ZIP archive for the complete, unedited source code that
|
|
# corresponds to the current check-out.
|
|
#
|
|
set VERSION-file [file dirname [file dirname [file normalize $argv0]]]/VERSION
|
|
set fd [open ${VERSION-file} rb]
|
|
set vers [read $fd]
|
|
close $fd
|
|
scan $vers %d.%d.%d major minor patch
|
|
set numvers [format {3%02d%02d00} $minor $patch]
|
|
set cmd "fossil zip current sqlite-src-$numvers.zip --name sqlite-src-$numvers"
|
|
puts $cmd
|
|
exec {*}$cmd
|