zymon/PortAudio.jl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

comments out the reference code we're using to start PortAudio.jl

Browse source
This commit is contained in:
Spencer Russell 2013-12-13 00:17:44 -05:00
parent af6dd508e2
commit 6bb4b33d9e
1 changed files with 58 additions and 58 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

116
src/PortAudio.jl
View file

@ -40,61 +40,61 @@ end
end # module PortAudio end # module PortAudio
type PaStreamCallbackTimeInfo #type PaStreamCallbackTimeInfo
inputBufferAdcTime::PaTime # inputBufferAdcTime::PaTime
currentTime::PaTime # currentTime::PaTime
outputBufferDacTime::PaTime # outputBufferDacTime::PaTime
end #end
#
typealias PaStreamCallbackFlags Culong #typealias PaStreamCallbackFlags Culong
#
#
function stream_callback{T}( input_::Ptr{T}, #function stream_callback{T}( input_::Ptr{T},
output_::Ptr{T}, # output_::Ptr{T},
frame_count::Culong, # frame_count::Culong,
time_info::Ptr{PaStreamCallbackTimeInfo}, # time_info::Ptr{PaStreamCallbackTimeInfo},
status_flags::PaStreamCallbackFlags, # status_flags::PaStreamCallbackFlags,
user_data::Ptr{Void}) # user_data::Ptr{Void})
#
#
println("stfl:$status_flags \tframe_count:$frame_count") # println("stfl:$status_flags \tframe_count:$frame_count")
#
ret = 0 # ret = 0
return convert(Cint,ret)::Cint #continue stream # return convert(Cint,ret)::Cint #continue stream
#
end #end
#
T=Float32 #T=Float32
stream_callback_c = cfunction(stream_callback,Cint, #stream_callback_c = cfunction(stream_callback,Cint,
(Ptr{T},Ptr{T},Culong,Ptr{PaStreamCallbackTimeInfo},PaStreamCallbackFlags,Ptr{Void}) #(Ptr{T},Ptr{T},Culong,Ptr{PaStreamCallbackTimeInfo},PaStreamCallbackFlags,Ptr{Void})
) #)
stream_obj = Array(Ptr{PaStream},1) #stream_obj = Array(Ptr{PaStream},1)
#
pa_err = ccall( #pa_err = ccall(
(:Pa_Initialize,"libportaudio"), #(:Pa_Initialize,"libportaudio"),
PaError, #PaError,
(), #(),
) #)
#
println(get_error_text(pa_err)) #println(get_error_text(pa_err))
#
pa_err = ccall( #pa_err = ccall(
(:Pa_OpenDefaultStream,"libportaudio"), #(:Pa_OpenDefaultStream,"libportaudio"),
PaError, #PaError,
(Ptr{Ptr{PaStream}},Cint,Cint,PaSampleFormat,Cdouble,Culong,Ptr{Void},Any), #(Ptr{Ptr{PaStream}},Cint,Cint,PaSampleFormat,Cdouble,Culong,Ptr{Void},Any),
stream_obj,0,1,0x1,8000.0,4096,stream_callback_c,None #stream_obj,0,1,0x1,8000.0,4096,stream_callback_c,None
) #)
#
println(get_error_text(pa_err)) #println(get_error_text(pa_err))
#
function start_stream(stream) #function start_stream(stream)
pa_err = ccall( # pa_err = ccall(
(:Pa_StartStream,"libportaudio"), # (:Pa_StartStream,"libportaudio"),
PaError, # PaError,
(Ptr{PaStream},), # (Ptr{PaStream},),
stream # stream
) # )
println(get_error_text(pa_err)) # println(get_error_text(pa_err))
end #end
#
end #module #end #module