: extension ( os -- extension )
{
- { "winnt" [ ".zip" ] }
+ { "windows" [ ".zip" ] }
{ "macosx" [ ".dmg" ] }
[ drop ".tar.gz" ]
} case ;
: make-archive ( archive-name -- )
target-os get {
- { "winnt" [ make-windows-archive ] }
+ { "windows" [ make-windows-archive ] }
{ "macosx" [ make-macosx-archive ] }
[ drop make-unix-archive ]
} case ;