defmodule step files (trace) import (toplevel defs virbitmap files) export (trace untrace step unstep cstep #:step:stepeval tracend stepend debugend #: trace:output) cpexport ((trace fsubr ()) (untrace fsubr ()) (step fsubr ()) (unstep fsubr ()) (cstep fsubr ()) (#:step:stepeval subr2 () (#:step:forme #:step:env)) (tracend subr0 ()) (stepend subr0 ()) (debugend subr0 ()) (#:trace:output dmsubr ())) cpfunctions ((#:trace:trace-one subr1) (#:trace:untrace-one subr1) (build-tracing-fval subr1) (parse-specif subr1) (default-specif subr1) (#:trace:flat subr1 () (r)) (#:trace:flat-aux subr1) (#:step:steploop subr1) (#:step:stepmargin subr1) (#: step:nobind? subr1)) cpimport ((toplevel (printerror . subr3)) (defs (resetfn . subr3)) (virbitmap ( create-window . nsubr) (bitxmax . nsubr) (height-space . subr0) (bitymax . nsubr) (kill-window . subr1)) (files (featurep . subr1) (libautoload . fsubr) (rem-feature . subr1))) cpenv (((defun #:ld68k:patch-cons-llitt () ())))