;; -*- scheme -*- ; not really, but tells emacs how to format this
;;
;; Copyright 2007 Free Software Foundation, Inc.
;; 
;; This file is part of GNU Radio
;; 
;; GNU Radio 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, or (at your option)
;; any later version.
;; 
;; GNU Radio 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.
;;

;; ----------------------------------------------------------------
;; qa-bitset -- interface to mblock QA code
;;

(define-protocol-class qa-bitset

  (:incoming

   (data n bitmask)

   )
  )

(define-protocol-class qa-bitset-cs

  (:outgoing

   (send-batch)

   )
  )

;; ----------------------------------------------------------------
;; qa-disconnect -- interface to mblock QA code
;;

(define-protocol-class qa-disconnect-cs

  (:outgoing

   (select-pipe n)

   )

  (:incoming

   (ack n)

   )
  )