diff options
Diffstat (limited to 'mixguile/mixguile-vm-stat.scm')
| -rw-r--r-- | mixguile/mixguile-vm-stat.scm | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/mixguile/mixguile-vm-stat.scm b/mixguile/mixguile-vm-stat.scm index 1887b4c..60f25a5 100644 --- a/mixguile/mixguile-vm-stat.scm +++ b/mixguile/mixguile-vm-stat.scm @@ -1,24 +1,22 @@ ;; -*-scheme-*- -------------- mixguile-vm-stat.scm : ; mixvm status functions ; ------------------------------------------------------------------ -; $Id: mixguile-vm-stat.scm,v 1.4 2005/09/20 19:43:14 jao Exp $ -; ------------------------------------------------------------------ -; Copyright (C) 2001 Free Software Foundation, Inc. -; +; Copyright (C) 2001, 2006 Free Software Foundation, Inc. +; ; This program is free software; you can redistribute it and/or modify ; it under the terms of the GNU General Public License as published by ; the Free Software Foundation; either version 2 of the License, or ; (at your option) any later version. -; +; ; This program is distributed in the hope that it will be useful, ; but WITHOUT ANY WARRANTY; without even the implied warranty of ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ; GNU General Public License for more details. -; +; ; You should have received a copy of the GNU General Public License ; along with this program; if not, write to the Free Software ; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. -; +; ;; ;; possible status index @@ -57,7 +55,7 @@ (lambda (hook) (mix-add-post-hook 'run hook) (mix-add-post-hook 'next hook))) - + (define mix-add-break-hook (lambda (hook) @@ -68,4 +66,4 @@ (mix-add-run-next-hook (mix-make-conditional-hook mix-vm-cond-break? hook)))) - + |