summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnuradio-core/src/guile/tests/filter_ctors.test116
-rw-r--r--gnuradio-core/src/guile/tests/general_ctors.test33
-rw-r--r--gnuradio-core/src/guile/tests/gengen_ctors.test43
-rw-r--r--gnuradio-core/src/guile/tests/hier_ctors.test4
-rw-r--r--gnuradio-core/src/guile/tests/io_ctors.test10
5 files changed, 92 insertions, 114 deletions
diff --git a/gnuradio-core/src/guile/tests/filter_ctors.test b/gnuradio-core/src/guile/tests/filter_ctors.test
index 6a35bd296..ee851b6e0 100644
--- a/gnuradio-core/src/guile/tests/filter_ctors.test
+++ b/gnuradio-core/src/guile/tests/filter_ctors.test
@@ -39,17 +39,17 @@
;;; ./filter/gr_cma_equalizer_cc.h
(pass-if (true? (gr:cma-equalizer-cc 0 0 0)))
-;;; ./filter/gr_fft_filter_ccc.h FIXME: not found
-;; (pass-if (true? (gr:fft-filter-ccc 0 #(1+3i 23+5i))))
+;;; ./filter/gr_fft_filter_ccc.h
+(pass-if (true? (gr:fft-filter-ccc 0 #(1+3i 23+5i))))
-;;; ./filter/gr_fft_filter_fff.h FIXME: not found
-;; (pass-if (true? (gr:fft-filter-fff 0 #(1.0 2.0))))
+;;; ./filter/gr_fft_filter_fff.h
+(pass-if (true? (gr:fft-filter-fff 0 #(1.0 2.0))))
-;;; ./filter/gr_filter_delay_fc.h FIXME: not found
-;; (pass-if (true? (gr:filter-delay-fc #(1.0 2.0))))
+;;; ./filter/gr_filter_delay_fc.h
+(pass-if (true? (gr:filter-delay-fc #(1.0 2.0))))
-;;; ./filter/gr_fir_ccc_generic.h FIXME: not found
-;; (pass-if (true? (gr:fir-ccc-generic)))
+;;; ./filter/gr_fir_ccc_generic. FIXME: Unbound variable: ~S" (gr:fir-ccc-generic) #f))
+;; (pass-if (true? (gr:fir-ccc-generic)))
;; (pass-if (true? (gr:fir-ccc-generic #(1+3i 23+5i))))
;;; ./filter/gr_fir_ccc_simd.h FIXME: not found
@@ -104,41 +104,41 @@
;;; ./filter/gr_fir_filter_ccc.h FIXME: not found
;; (pass-if (true? (gr:fir-filter-ccc 1 #(1+3i 23+5i))))
-;;; ./filter/gr_fir_filter_ccf.h FIXME: not found
-;; (pass-if (true? (gr:fir-filter-ccf 1 #(1.0 2.0))))
+;;; ./filter/gr_fir_filter_ccf.h
+(pass-if (true? (gr:fir-filter-ccf 1 #(1.0 2.0))))
-;;; ./filter/gr_fir_filter_fcc.h FIXME: not found
-;; (pass-if (true? (gr:fir-filter-fcc 1 #(1+3i 23+5i))))
+;;; ./filter/gr_fir_filter_fcc.h
+(pass-if (true? (gr:fir-filter-fcc 1 #(1+3i 23+5i))))
-;;; ./filter/gr_fir_filter_fff.h FIXME: not found
-;; (pass-if (true? (gr:fir-filter-fff 1 #(1.0 2.0))))
+;;; ./filter/gr_fir_filter_fff.h
+(pass-if (true? (gr:fir-filter-fff 1 #(1.0 2.0))))
-;;; ./filter/gr_fir_filter_fsf.h FIXME: not found
-;; (pass-if (true? (gr:fir-filter-fsf 1 #(1.0 2.0))))
+;;; ./filter/gr_fir_filter_fsf.h
+(pass-if (true? (gr:fir-filter-fsf 1 #(1.0 2.0))))
-;;; ./filter/gr_fir_filter_scc.h FIXME: not found
-;; (pass-if (true? (gr:fir-filter-scc 1 #(1+3i 23+5i))))
+;;; ./filter/gr_fir_filter_scc.h
+(pass-if (true? (gr:fir-filter-scc 1 #(1+3i 23+5i))))
-;;; ./filter/gr_fir_fsf_generic.h FIXME: not found
+;;; ./filter/gr_fir_fsf_generic.h FIXME: "Unbound variable: ~S" (gr:fir-fsf-generic) #f))
;; (pass-if (true? (gr:fir-fsf-generic)))
;; (pass-if (true? (gr:fir-fsf-generic #(1.0 2.0))))
;;; ./filter/gr_fir_fsf_simd.h FIXME: not found
;; (pass-if (true? (gr:fir-fsf-simd 0 0 0)))
-;;; ./filter/gr_fir_fsf_x86.h FIXME: not found
+;;; ./filter/gr_fir_fsf_x86.h FIXME: "Unbound variable: ~S" (gr:fir-fsf-x86) #f))
;; (pass-if (true? (gr:fir-fsf-x86)))
;; (pass-if (true? (gr:fir-fsf-x86 #(1.0 2.0))))
-;;; ./filter/gr_fir_scc_generic.h FIXME: not found
+;;; ./filter/gr_fir_scc_generic.h FIXME: file not found
;; (pass-if (true? (gr:fir-scc-generic)))
;; (pass-if (true? (gr:fir-scc-generic #(1+3i 23+5i))))
-;;; ./filter/gr_fir_scc_simd.h FIXME: not found
+;;; ./filter/gr_fir_scc_simd.h FIXME: Unbound variable: ~S" (gr:fir-scc-simd) #f))
;; (pass-if (true? (gr:fir-scc-simd)))
;; (pass-if (true? (gr:fir-scc-simd #(1+3i 23+5i))))
-;;; ./filter/gr_fir_scc_x86.h FIXME: not found
+;;; ./filter/gr_fir_scc_x86.h FIXME: "Unbound variable: ~S" (gr:fir-scc-x86) #f))
;; (pass-if (true? (gr:fir-scc-x86)))
;; (pass-if (true? (gr:fir-scc-x86 #(1+3i 23+5i))))
@@ -152,97 +152,97 @@
;; (pass-if (true? (gr:fir-sysconfig-powerpc )))
;;; ./filter/gr_fir_sysconfig_x86.h FIXME: virtual methods
-;; (pass-if (true? (gr:fir-sysconfig-x86 )))
+;; (pass-if (true? (gr:fir-sysconfig-x86 #(1+3i 23+5i))))
-;;; ./filter/gr_fractional_interpolator_cc.h FIXME: not found
+;;; ./filter/gr_fractional_interpolator_cc.h FIXME: file not found
;; (pass-if (true? (gr:fractional-interpolator-cc 1.0 1.0)))
-;;; ./filter/gr_fractional_interpolator_ff.h FIXME: not found
+;;; ./filter/gr_fractional_interpolator_ff.h FIXME: file not found
;; (pass-if (true? (gr:fractional-interpolator-ff 1.0 1.0)))
-;;; ./filter/gr_freq_xlating_fir_filter_ccc.h FIXME: not found
+;;; ./filter/gr_freq_xlating_fir_filter_ccc.h FIXME: file not found
;; (pass-if (true? (gr:freq-xlating-fir-filter-ccc 1.0 1.0)))
-;;; ./filter/gr_freq_xlating_fir_filter_ccf.h FIXME: not found
+;;; ./filter/gr_freq_xlating_fir_filter_ccf.h FIXME: file not found
;; (pass-if (true? (gr:freq-xlating-fir-filter-ccf 1.0 1.0)))
-;;; ./filter/gr_freq_xlating_fir_filter_fcc.h FIXME: not found
+;;; ./filter/gr_freq_xlating_fir_filter_fcc.h FIXME: file not found
;; (pass-if (true? (gr:freq-xlating-fir-filter-fcc 1.0 1.0)))
-;;; ./filter/gr_freq_xlating_fir_filter_fcf.h FIXME: not found
+;;; ./filter/gr_freq_xlating_fir_filter_fcf.h FIXME: file not found
;; (pass-if (true? (gr:freq-xlating-fir-filter-fcf 1.0 1.0)))
-;;; ./filter/gr_freq_xlating_fir_filter_scc.h FIXME: not found
+;;; ./filter/gr_freq_xlating_fir_filter_scc.h FIXME: file not found
;; (pass-if (true? (gr:freq-xlating-fir-filter-scc 1.0 1.0)))
-;;; ./filter/gr_freq_xlating_fir_filter_scf.h FIXME: not found
+;;; ./filter/gr_freq_xlating_fir_filter_scf.h FIXME: file not found
;; (pass-if (true? (gr:freq-xlating-fir-filter-scf 1.0 1.0)))
-;;; ./filter/gr_goertzel_fc.h FIXME: not found
-;; (pass-if (true? (gr:goertzel-fc 1 1 1)))
+;;; ./filter/gr_goertzel_fc.h
+(pass-if (true? (gr:goertzel-fc 1 1 1)))
-;;; ./filter/gr_hilbert_fc.h FIXME: not found
-;; (pass-if (true? (gr:hilbert-fc )))
+;;; ./filter/gr_hilbert_fc.h
+(pass-if (true? (gr:hilbert-fc 1)))
-;;; ./filter/gr_iir_filter_ffd.h FIXME: not found
-;; (pass-if (true? (gr:iir-filter-ffd )))
+;;; ./filter/gr_iir_filter_ffd.h
+(pass-if (true? (gr:iir-filter-ffd #(1.0 2.0) #(1.0 2.0))))
-;;; ./filter/gr_interp_fir_filter_ccc.h FIXME: not found
+;;; ./filter/gr_interp_fir_filter_ccc.h FIXME: file not found
;; (pass-if (true? (gr:interp-fir-filter-ccc )))
-;;; ./filter/gr_interp_fir_filter_ccf.h FIXME: not found
+;;; ./filter/gr_interp_fir_filter_ccf.h FIXME: file not found
;; (pass-if (true? (gr:interp-fir-filter-ccf )))
-;;; ./filter/gr_interp_fir_filter_fcc.h FIXME: not found
+;;; ./filter/gr_interp_fir_filter_fcc.h FIXME: file not found
;; (pass-if (true? (gr:interp-fir-filter-fcc )))
-;;; ./filter/gr_interp_fir_filter_fff.h FIXME: not found
+;;; ./filter/gr_interp_fir_filter_fff.h FIXME: file not found
;; (pass-if (true? (gr:interp-fir-filter-fff )))
-;;; ./filter/gr_interp_fir_filter_fsf.h FIXME: not found
+;;; ./filter/gr_interp_fir_filter_fsf.h FIXME: file not found
;; (pass-if (true? (gr:interp-fir-filter-fsf )))
-;;; ./filter/gr_interp_fir_filter_scc.h
+;;; ./filter/gr_interp_fir_filter_scc.h FIXME: file not found
;; (pass-if (true? (gr:interp-fir-filter-scc )))
;;; ./filter/gr_pfb_arb_resampler_ccf.h
-;; (pass-if (true? (gr:pfb-arb-resampler-ccf )))
+(pass-if (true? (gr:pfb-arb-resampler-ccf 1.0 #(1.0 2.0) 32)))
;;; ./filter/gr_pfb_channelizer_ccf.h
-;; (pass-if (true? (gr:pfb-channelizer-ccf )))
+(pass-if (true? (gr:pfb-channelizer-ccf 1 #(1.0 2.0) 1)))
;;; ./filter/gr_pfb_clock_sync_ccf.h
-;; (pass-if (true? (gr:pfb-clock-sync-ccf )))
+(pass-if (true? (gr:pfb-clock-sync-ccf 1.0 1.0 #(1.0 2.0) 32 0 1.5)))
;;; ./filter/gr_pfb_clock_sync_fff.h
-;; (pass-if (true? (gr:pfb-clock-sync-fff )))
+(pass-if (true? (gr:pfb-clock-sync-fff 1.0 1.0 #(1.0 2.0) 32 0 1.5)))
;;; ./filter/gr_pfb_decimator_ccf.h
-;; (pass-if (true? (gr:pfb-decimator-ccf )))
+(pass-if (true? (gr:pfb-decimator-ccf 1 #(1.0 2.0) 0)))
;;; ./filter/gr_pfb_interpolator_ccf.h
-;; (pass-if (true? (gr:pfb-interpolator-ccf )))
+(pass-if (true? (gr:pfb-interpolator-ccf 1 #(1.0 2.0))))
-;;; ./filter/gr_rational_resampler_base_ccc.h
+;;; ./filter/gr_rational_resampler_base_ccc.h FIXME: file not found
;; (pass-if (true? (gr:rational-resampler-base-ccc )))
-;;; ./filter/gr_rational_resampler_base_ccf.h
+;;; ./filter/gr_rational_resampler_base_ccf.h FIXME: file not found
;; (pass-if (true? (gr:rational-resampler-base-ccf )))
-;;; ./filter/gr_rational_resampler_base_fcc.h
+;;; ./filter/gr_rational_resampler_base_fcc.h FIXME: file not found
;; (pass-if (true? (gr:rational-resampler-base-fcc )))
-;;; ./filter/gr_rational_resampler_base_fff.h
+;;; ./filter/gr_rational_resampler_base_fff.h FIXME: file not found
;; (pass-if (true? (gr:rational-resampler-base-fff )))
-;;; ./filter/gr_rational_resampler_base_fsf.h
+;;; ./filter/gr_rational_resampler_base_fsf.h FIXME: file not found
;; (pass-if (true? (gr:rational-resampler-base-fsf )))
-;;; ./filter/gr_rational_resampler_base_scc.h
+;;; ./filter/gr_rational_resampler_base_scc.h FIXME: file not found
;; (pass-if (true? (gr:rational-resampler-base-scc )))
;;; ./filter/gr_single_pole_iir_filter_cc.h
-;; (pass-if (true? (gr:single-pole-iir-filter-cc )))
+(pass-if (true? (gr:single-pole-iir-filter-cc 1.0 1)))
;;; ./filter/gr_single_pole_iir_filter_ff.h
-;; (pass-if (true? (gr:single-pole-iir-filter-ff )))
+(pass-if (true? (gr:single-pole-iir-filter-ff 1.0 1)))
diff --git a/gnuradio-core/src/guile/tests/general_ctors.test b/gnuradio-core/src/guile/tests/general_ctors.test
index a18766400..6abc08399 100644
--- a/gnuradio-core/src/guile/tests/general_ctors.test
+++ b/gnuradio-core/src/guile/tests/general_ctors.test
@@ -116,10 +116,8 @@
;;; ./general/gr_conjugate_cc.h
(pass-if (true? (gr:conjugate-cc)))
-;;; ./general/gr_constellation_decoder_cb.h FIXME: wrong-arg-type (not sure why...)
-;gr_constellation_decoder_cb (const std::vector<gr_complex> &sym_position,
-; const std::vector<unsigned char> &sym_value_out);
-;; (pass-if (true? (gr:constellation-decoder-cb #(2+3i 23+5i) #(0 1))))
+;;; ./general/gr_constellation_decoder_cb.h
+(pass-if (true? (gr:constellation-decoder-cb #(2+3i 23+5i) #(0 1))))
;;; ./general/gr_copy.h
(pass-if (true? (gr:copy 1)))
@@ -167,7 +165,7 @@
;;; ./general/gr_encode_ccsds_27_bb.h
(pass-if (true? (gr:encode-ccsds-27-bb)))
-;;; ./general/gr_fake_channel_coder_pp.h FIXME: file name doesn't match class name
+;;; ./general/gr_fake_channel_coder_pp.h
(pass-if (true? (gr:fake-channel-encoder-pp 1 1)))
(pass-if-throw "confirm throw" #t (true? (gr:fake-channel-encoder-pp -1 1)))
@@ -178,7 +176,6 @@
(pass-if (true? (gr:fft-vcc 1 #f #(1.0 2.0) #t)))
;;; ./general/gr_fft_vfc.h
-;; bool set_window(const std::vector<float> &window);
(pass-if (true? (gr:fft-vfc 4 #t #(1.0 2.0 3.0 4.0))))
(pass-if-throw "confirm throw gr:fft-vfc" #t (true? (gr:fft-vfc 4 #f #(1.0 2.0 3.0 4.0))))
@@ -239,7 +236,6 @@
(pass-if (true? (gr:lms-dfe-ff 1 1 1 1)))
;;; ./general/gr_map_bb.h
-;; gr_map_bb (const std::vector<int> &map);
(pass-if (true? (gr:map-bb #(1 2))))
;;; ./general/gr_mpsk_receiver_cc.h
@@ -260,25 +256,14 @@
;;; ./general/gr_ofdm_cyclic_prefixer.h
(pass-if (true? (gr:ofdm-cyclic-prefixer 1 1)))
-;;; ./general/gr_ofdm_frame_acquisition.h FIXME: "No matching method for generic function `ofdm_frame_acquisition'"
-;; gr_ofdm_frame_acquisition (unsigned int occupied_carriers,
-;; unsigned int fft_length,
-;; unsigned int cplen,
-;; const std::vector<gr_complex> &known_symbol,
-;; unsigned int max_fft_shift_len);
-;; (pass-if (true? (gr:ofdm-frame-acquisition 0 0 0 #(1+3i 23+5i) 0)))
+;;; ./general/gr_ofdm_frame_acquisition.h
+(pass-if (true? (gr:ofdm-frame-acquisition 1 1 1 #(1+3i 23+5i) 1)))
;;; ./general/gr_ofdm_frame_sink.h FIXME: "No matching method for generic function `ofdm_frame_sink'"
-;; gr_ofdm_frame_sink(const std::vector<gr_complex> &sym_position,
-;; const std::vector<unsigned char> &sym_value_out,
-;; gr_msg_queue_sptr target_queue, unsigned int occupied_tones,
-;; float phase_gain, float freq_gain);
-;;(pass-if (true? (gr:ofdm-frame-sink #(1+3i 23+5i) #(1 2) (gr:msg-queue) 1 0.25 0)))
-
-;;; ./general/gr_ofdm_insert_preamble.h FIXME: Wrong type argument in position ~A:
-;; gr_ofdm_insert_preamble(int fft_length,
-;; const std::vector<std::vector<gr_complex> > &preamble);
-;;(pass-if (true? (gr:ofdm-insert-preamble 1 #(#(1+3i 23+5i)))))
+;; (pass-if (true? (gr:ofdm-frame-sink #(1+3i 23+5i) #(1 2) (gr:msg-queue) 1 0.25 0)))
+
+;;; ./general/gr_ofdm_insert_preamble.h FIXME: "Wrong type argument in position ~A: ~S"
+;; (pass-if (true? (gr:ofdm-insert-preamble 1 #(#(1+3i 23+5i)))))
;;; ./general/gr_ofdm_mapper_bcv.h FIXME: Wrong type argument in position ~A:
;; gr_ofdm_mapper_bcv (const std::vector<gr_complex> &constellation,
diff --git a/gnuradio-core/src/guile/tests/gengen_ctors.test b/gnuradio-core/src/guile/tests/gengen_ctors.test
index 10eb1d9e0..43996c001 100644
--- a/gnuradio-core/src/guile/tests/gengen_ctors.test
+++ b/gnuradio-core/src/guile/tests/gengen_ctors.test
@@ -50,9 +50,8 @@
;;; ./gengen/gr_add_const_ss.h
(pass-if (true? (gr:add-const-ss 0)))
-;;; ./gengen/gr_add_const_vcc.h FIXME: Wrong type argument in position ~A:
-;; gr_make_add_const_vcc (const std::vector<gr_complex> &k);
-;; (pass-if (true? (gr:add-const-vcc #(1+3i 23+5i))))
+;;; ./gengen/gr_add_const_vcc.h
+(pass-if (true? (gr:add-const-vcc #(1+3i 23+5i))))
;;; ./gengen/gr_add_const_vff.h
(pass-if (true? (gr:add-const-vff #(1.0 2.0))))
@@ -99,25 +98,23 @@
;;; ./gengen/gr_argmax_ss.h
(pass-if (true? (gr:argmax-ss 1)))
-;;; ./gengen/gr_chunks_to_symbols_bc.h FIXME: not found
-;; (pass-if (true? (gr:chunks-to-symbols-bc #(1+3i 23+5i) 1)))
+;;; ./gengen/gr_chunks_to_symbols_bc.h
+(pass-if (true? (gr:chunks-to-symbols-bc #(1+3i 23+5i) 1)))
;;; ./gengen/gr_chunks_to_symbols_bf.h
(pass-if (true? (gr:chunks-to-symbols-bf #(1.0 2.0) 1)))
-;;; ./gengen/gr_chunks_to_symbols_ic.h FIXME: not found
-;; gr_make_chunks_to_symbols_ic (const std::vector<gr_complex> &symbol_table, const int D = 1);
-;; (pass-if (true? (gr:chunks-to-symbols-ic #(1+3i 23+5i) 1)))
+;;; ./gengen/gr_chunks_to_symbols_ic.h
+(pass-if (true? (gr:chunks-to-symbols-ic #(1+3i 23+5i) 1)))
-;;; ./gengen/gr_chunks_to_symbols_if.h FIXME: not found
-;; gr_make_chunks_to_symbols_if (const std::vector<float> &symbol_table, const int D = 1);
-;; (pass-if (true? (gr:chunks_to_symbols_if #(1.0 2.0) 1)))
+;;; ./gengen/gr_chunks_to_symbols_if.h
+(pass-if (true? (gr:chunks-to-symbols-if #(1.0 2.0) 1)))
-;;; ./gengen/gr_chunks_to_symbols_sc.h FIXME: not found
-;; (pass-if (true? (gr:chunks_to_symbols_sc #(1.0 2.0) 1)))
+;;; ./gengen/gr_chunks_to_symbols_sc.h
+(pass-if (true? (gr:chunks-to-symbols-sc #(1.0 2.0) 1)))
-;;; ./gengen/gr_chunks_to_symbols_sf.h FIXME: not found
-;; (pass-if (true? (gr:chunks_to_symbols_sf #(1.0 2.0) 1)))
+;;; ./gengen/gr_chunks_to_symbols_sf.h
+(pass-if (true? (gr:chunks-to-symbols-sf #(1.0 2.0) 1)))
;;; ./gengen/gr_divide_cc.h
(pass-if (true? (gr:divide-cc 1)))
@@ -179,9 +176,8 @@
;;; ./gengen/gr_multiply_const_ss.h
(pass-if (true? (gr:multiply-const-ss 1)))
-;;; ./gengen/gr_multiply_const_vcc.h FIXME: wrong type argument in position ~A:
-;; gr_make_multiply_const_vcc (const std::vector<gr_complex> &k);
-;; (pass-if (true? (gr:multiply-const-vcc #(1+3i 23+5i))))
+;;; ./gengen/gr_multiply_const_vcc.h
+(pass-if (true? (gr:multiply-const-vcc #(1+3i 23+5i))))
;;; ./gengen/gr_multiply_const_vff.h
(pass-if (true? (gr:multiply-const-vff #(1.0 2.0))))
@@ -321,19 +317,16 @@
;;; ./gengen/gr_vector_sink_s.h
(pass-if (true? (gr:vector-sink-s 1)))
-;;; ./gengen/gr_vector_source_b.h FIXME: not found
+;;; ./gengen/gr_vector_source_b.h
;; (pass-if (true? (gr:vector-source-b #(1 2) false 1)))
-;;; ./gengen/gr_vector_source_c.h FIXME: not found
-;; gr_make_vector_source_c (const std::vector<gr_complex> &data, bool repeat = false, int vlen = 1)
+;; ;;; ./gengen/gr_vector_source_c.h
;; (pass-if (true? (gr:vector-source-c #(1+3i 23+5i) false 1)))
-;;; ./gengen/gr_vector_source_f.h FIXME: not found
-;; gr_make_vector_source_f (const std::vector<float> &data, bool repeat = false, int vlen = 1)
+;; ;;; ./gengen/gr_vector_source_f.h
;; (pass-if (true? (gr:vector-source-f #(1.0 2.0) false 1)))
-;;; ./gengen/gr_vector_source_i.h FIXME: not found
-;; gr_make_vector_source_i (const std::vector<int> &data, bool repeat = false, int vlen = 1)
+;;; ./gengen/gr_vector_source_i.h
;; (pass-if (true? (gr:vector-source-i #(1 2) false 1)))
;;; ./gengen/gr_vector_source_s.h FIXME: not found
diff --git a/gnuradio-core/src/guile/tests/hier_ctors.test b/gnuradio-core/src/guile/tests/hier_ctors.test
index 8a83c86d5..b79ee0f15 100644
--- a/gnuradio-core/src/guile/tests/hier_ctors.test
+++ b/gnuradio-core/src/guile/tests/hier_ctors.test
@@ -32,9 +32,9 @@
;;; Add test code for all constructors in these files
;;;
-;;; ./hier/gr_channel_model.h
+;;; ./hier/gr_channel_model.h FIXME: Unbound variable: ~S" (gr:channel_model) #f))
;; gr_make_channel_model(double noise_voltage=0.0, double frequency_offset=0.0,
;; double epsilon=1.0,
;; const std::vector<gr_complex> &taps=std::vector<gr_complex>(1, 1),
;; double noise_seed=3021);
-;; (pass-if (true? (gr:channel_model )))
+;; (pass-if (true? (gr:channel_model 0.0 0.0 1.0 #(1 1) 3021)))
diff --git a/gnuradio-core/src/guile/tests/io_ctors.test b/gnuradio-core/src/guile/tests/io_ctors.test
index 80fb2d3f2..b74d66cda 100644
--- a/gnuradio-core/src/guile/tests/io_ctors.test
+++ b/gnuradio-core/src/guile/tests/io_ctors.test
@@ -33,10 +33,10 @@
;;;
;;; ./io/gr_file_descriptor_sink.h
-;;(pass-if (true? (gr:file-descriptor-sink 0 0))) FIXME: throws gr_io_signature(3)
+(pass-if (true? (gr:file-descriptor-sink 1 1)))
-;;; ./io/gr_file_descriptor_source.h
-;; (pass-if (true? (gr:file-descriptor-source 1 1 false))) FIXME: not found
+;;; ./io/gr_file_descriptor_source.h FIXME: not found
+;; (pass-if (true? (gr:file-descriptor-source 1 1 false)))
;;; ./io/gr_file_sink.h
(pass-if (true? (gr:file-sink 1 "foo")))
@@ -51,8 +51,8 @@
;;; ./io/gr_message_sink.h FIXME: not found
;; (pass-if (true? (gr:message-sink 1 1 false)))
-;;; ./io/gr_message_source.h
-;; (pass-if (true? (gr:message-source )))
+;;; ./io/gr_message_source.h FIXME: not found
+;; (pass-if (true? (gr:message-source 1.0 0)))
;;; ./io/gr_oscope_sink_f.h FIXME: not found
;; _oscope_sink_x (const std::string name, gr_io_signature_sptr input_sig,