reset-checksums ( -- ) - Factor Documentation (original) (raw)

reset-checksums ( -- )
Factor handbook » The implementation » Source files

Vocabulary
source-files

Word description
Resets recorded modification times and CRC32 checksums for all loaded source files, creating a checkpoint for Runtime code reloading.

Definition

USING: assocs io.encodings.utf8 io.files kernel namespaces ;

IN: source-files

: reset-checksums ( -- )
source-files get [
over file-exists?
[ [ utf8 file-lines ] dip record-checksum ] [ 2drop ] if
] assoc-each ;