]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/bootstrap/image/upload/upload.factor
Fixing everything for mandatory stack effects
[factor.git] / extra / bootstrap / image / upload / upload.factor
index 29c9d5b072e0ab6ad3520e6a687fa95b925f7f4b..de13b4aed43fc28b2e6e0d2908b2cbbe5f7d06ee 100755 (executable)
@@ -12,9 +12,9 @@ SYMBOL: upload-images-destination
   "slava@factorcode.org:/var/www/factorcode.org/newsite/images/latest/"
   or ;
 
-: checksums "checksums.txt" temp-file ;
+: checksums ( -- temp ) "checksums.txt" temp-file ;
 
-: boot-image-names images [ boot-image-name ] map ;
+: boot-image-names ( -- seq ) images [ boot-image-name ] map ;
 
 : compute-checksums ( -- )
     checksums ascii [