git.gag.com Git - debian/gnuradio/blob - mblock/src/lib/qa_bitset.mbh

   1 ;; -*- scheme -*- ; not really, but tells emacs how to format this
   2 ;;
   3 ;; Copyright 2007 Free Software Foundation, Inc.
   4 ;;
   5 ;; This file is part of GNU Radio
   6 ;;
   7 ;; GNU Radio is free software; you can redistribute it and/or modify
   8 ;; it under the terms of the GNU General Public License as published by
   9 ;; the Free Software Foundation; either version 3, or (at your option)
  10 ;; any later version.
  11 ;;
  12 ;; GNU Radio is distributed in the hope that it will be useful,
  13 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 ;; GNU General Public License for more details.
  16 ;;
  17 ;; You should have received a copy of the GNU General Public License along
  18 ;; with this program; if not, write to the Free Software Foundation, Inc.,
  19 ;; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  20 ;;
  21
  22 ;; ----------------------------------------------------------------
  23 ;; qa-bitset -- interface to mblock QA code
  24 ;;
  25
  26 (define-protocol-class qa-bitset
  27
  28   (:incoming
  29
  30    (data n bitmask)
  31
  32    )
  33   )
  34
  35 (define-protocol-class qa-bitset-cs
  36
  37   (:outgoing
  38
  39    (send-batch)
  40
  41    )
  42   )
  43
  44 ;; ----------------------------------------------------------------
  45 ;; qa-disconnect -- interface to mblock QA code
  46 ;;
  47
  48 (define-protocol-class qa-disconnect-cs
  49
  50   (:outgoing
  51
  52    (select-pipe n)
  53
  54    )
  55
  56   (:incoming
  57
  58    (ack n)
  59
  60    )
  61   )