;;; The defintion of the module COUNTCALLS defmodule countcalls files (countcalls) import (format) include () export (count-calls-init count-calls-start count-calls-stop count-calls-infos count-calls-printn count-calls-printa) ;;; Added automatically cpexport ((count-calls-init subr0 () () () (subr1) (())) (count-calls-start subr0 ()) ( count-calls-stop subr0 ()) (count-calls-infos nsubr ()) (count-calls-printn nsubr () () () () (subr2) (())) (count-calls-printa nsubr () () () () (subr2) (()))) cpfunctions ((#:count-calls:count-calls-init1 subr1) (#:count-calls:get-count-calls-infos subr2 (val-min) (l) (subr1) (()))) cpimport ((format (prinf . nsubr)))