#!/usr/bin/guile \
--debug -s
!#
(define *argv* (program-arguments))
(load "/usr/share/q-tools/q-view.scm")
(qview:process-file (cadr *argv*) qview:print-profiles)
