Revision 42caa092

b/config/grc_gr_qtgui.m4
88 88 
        gr-qtgui/python/Makefile \
89 89 
        gr-qtgui/python/run_tests \
90 90 
        gr-qtgui/swig/Makefile \
91 
        gr-qtgui/swig/run_guile_tests \
92 91 
    ])
93 92 






94
93


    GRC_BUILD_CONDITIONAL(gr-qtgui,[







95
94


        dnl run_tests is created from run_tests.in.  Make it executable.







96
95


        AC_CONFIG_COMMANDS([run_tests_qtgui],







97



			   [chmod +x gr-qtgui/python/run_tests







98



			    chmod +x gr-qtgui/swig/run_guile_tests])








96


			   [chmod +x gr-qtgui/python/run_tests])







99
97


    ])







100
98


])
















b/gr-qtgui/python/qa_qtgui.py





22
22








23
23


from gnuradio import gr, gr_unittest







24
24


import qtgui_swig







25



from PyQt4 import QtGui, QtCore







26



import sys, sip







27
25








28
26


class test_qtgui(gr_unittest.TestCase):







29
27








......




34
32


        self.tb = None







35
33


    







36
34


    def test01 (self):







37



        #pass







38



        # Test to make sure we can instantiate these







39



        self.qapp = QtGui.QApplication(sys.argv)








35


        # Test to make sure we can instantiate the sink







40
36


        self.qtsnk = qtgui_swig.sink_c(1024, gr.firdes.WIN_BLACKMAN_hARRIS, 







41
37


                                       0, 1, "Test",







42
38


                                       True, True, True, True)








39









40


    def test02 (self):








41


        # Test to make sure we can instantiate the sink








42


        self.qtsnk = qtgui_swig.sink_f(1024, gr.firdes.WIN_BLACKMAN_hARRIS, 








43


                                       0, 1, "Test",








44


                                       True, True, True, True)







43
45


        







44
46


        







45
47


if __name__ == '__main__':
















b/gr-qtgui/swig/Makefile.am





33
33


	$(QT_INCLUDES) \







34
34


	$(WITH_INCLUDES)







35
35








36



if GUILE







37



nobase_guile_DATA = \







38



	gnuradio/qtgui.scm







39



endif







40









41



noinst_GUILE  = qtgui.test







42









43









44
36


##############################







45
37


# SWIG interface and library







46
38


TOP_SWIG_IFILES = \







......




59
51








60
52


# additional SWIG files to be installed







61
53


qtgui_swig_swiginclude_headers = 







62









63



if GUILE







64



TESTS += run_guile_tests







65



endif
















/dev/null





1



;;;







2



;;; Copyright 2011 Free Software Foundation, Inc.







3



;;;







4



;;; This file is part of GNU Radio







5



;;;







6



;;; GNU Radio is free software; you can redistribute it and/or modify







7



;;; it under the terms of the GNU General Public License as published by







8



;;; the Free Software Foundation; either version 3, or (at your option)







9



;;; any later version.







10



;;;







11



;;; GNU Radio is distributed in the hope that it will be useful,







12



;;; but WITHOUT ANY WARRANTY; without even the implied warranty of







13



;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the







14



;;; GNU General Public License for more details.







15



;;;







16



;;; You should have received a copy of the GNU General Public License







17



;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.







18



;;;







19









20



;;; Module that just re-exports the qtgui_swig module







21









22



(define-module (gnuradio qtgui)







23



  #:use-module (gnuradio export-safely)







24



  #:use-module (gnuradio qtgui_swig)







25



  #:duplicates (merge-generics replace check))







26









27



(re-export-all '(gnuradio qtgui_swig))







28


















/dev/null





1



;;; -*- Scheme -*-







2



;;;







3



;;; Copyright 2011 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







18



;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.







19



;;;







20









21



;;; If you're using Emacs's Scheme mode:







22



;;;   (put 'with-test-prefix 'scheme-indent-function 1)







23









24



;;; See the comments in gnuradio/test-suite/lib.scm for info on writing tests.







25



;;; See also the very end of the file, where the test-equal, test-eqv







26



;;; and test-eq macros are defined.







27









28



(define-module (test-module)







29



  #:use-module (oop goops)







30



  #:use-module (gnuradio core)







31



  #:use-module (gnuradio test-suite lib)







32



  #:duplicates (merge-generics replace check))







33









34



;;; Confirm we can import the module...







35



(use-modules (gnuradio qtgui))







36


















/dev/null





1



#!/bin/sh







2









3



. @top_builddir@/setup_guile_test_env







4









5



# 1st argument is absolute path to hand coded guile source directory







6



# 2nd argument is absolute path to component C++ shared library build directory







7



# 3nd argument is absolute path to component SWIG build directory







8









9



add_local_paths \







10



    @srcdir@ \







11



    @abs_builddir@ \







12



    @abs_builddir@







13









14



@GUILE@ -e main -c '(use-modules (gnuradio test-suite guile-test))' -t @srcdir@











Also available in:
Unified diff