Statistics
| Branch: | Tag: | Revision:

root / gr-uhd / swig / uhd.test @ 8af43d7d

History | View | Annotate | Download (1.3 kB)

1 b8f174ce Eric Blossom
;;; -*- Scheme -*-
2 b8f174ce Eric Blossom
;;;
3 b8f174ce Eric Blossom
;;; Copyright 2010 Free Software Foundation, Inc.
4 b8f174ce Eric Blossom
;;;
5 b8f174ce Eric Blossom
;;; This file is part of GNU Radio
6 b8f174ce Eric Blossom
;;;
7 b8f174ce Eric Blossom
;;; GNU Radio is free software; you can redistribute it and/or modify
8 b8f174ce Eric Blossom
;;; it under the terms of the GNU General Public License as published by
9 b8f174ce Eric Blossom
;;; the Free Software Foundation; either version 3, or (at your option)
10 b8f174ce Eric Blossom
;;; any later version.
11 b8f174ce Eric Blossom
;;;
12 b8f174ce Eric Blossom
;;; GNU Radio is distributed in the hope that it will be useful,
13 b8f174ce Eric Blossom
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
14 b8f174ce Eric Blossom
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 b8f174ce Eric Blossom
;;; GNU General Public License for more details.
16 b8f174ce Eric Blossom
;;;
17 b8f174ce Eric Blossom
;;; You should have received a copy of the GNU General Public License
18 b8f174ce Eric Blossom
;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 b8f174ce Eric Blossom
;;;
20 b8f174ce Eric Blossom
21 b8f174ce Eric Blossom
;;; If you're using Emacs's Scheme mode:
22 b8f174ce Eric Blossom
;;;   (put 'with-test-prefix 'scheme-indent-function 1)
23 b8f174ce Eric Blossom
24 b8f174ce Eric Blossom
;;; See the comments in gnuradio/test-suite/lib.scm for info on writing tests.
25 b8f174ce Eric Blossom
;;; See also the very end of the file, where the test-equal, test-eqv
26 b8f174ce Eric Blossom
;;; and test-eq macros are defined.
27 b8f174ce Eric Blossom
28 b8f174ce Eric Blossom
(define-module (test-module)
29 b8f174ce Eric Blossom
  #:use-module (oop goops)
30 b8f174ce Eric Blossom
  #:use-module (gnuradio core)
31 b8f174ce Eric Blossom
  #:use-module (gnuradio test-suite lib)
32 b8f174ce Eric Blossom
  #:duplicates (merge-generics replace check))
33 b8f174ce Eric Blossom
34 b8f174ce Eric Blossom
;;; Just see if we can import the module...
35 b8f174ce Eric Blossom
;;; They may not have a UHD device attached, powered up etc.
36 b8f174ce Eric Blossom
37 b8f174ce Eric Blossom
(use-modules (gnuradio uhd))