/usr/share/racket/pkgs/profile-lib/raco-utils.rkt is in racket-common 6.7-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 | #lang racket/base
(provide module-to-profile)
(define (module-to-profile file)
;; check if there's a main submodule
(define file-path `(file ,file))
(define main-path `(submod ,file-path main))
(dynamic-require file-path (void)) ; visit the module, but don't run it
(if (module-declared? main-path #f)
main-path
file-path))
|