Changeset 7105
- Timestamp:
- 01/25/10 21:48:31 (7 months ago)
- Files:
-
- 1 modified
-
trunk/liquidsoap/src/encoder/lame_encoder.ml (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/liquidsoap/src/encoder/lame_encoder.ml
r7017 r7105 41 41 let encoder mp3 = 42 42 let channels = if mp3.stereo then 2 else 1 in 43 let e = create_encoder ~samplerate:mp3.samplerate ~bitrate:mp3.bitrate ~quality:mp3.quality ~stereo:mp3.stereo in 44 43 let e = create_encoder ~samplerate:mp3.samplerate 44 ~bitrate:mp3.bitrate 45 ~quality:mp3.quality 46 ~stereo:mp3.stereo 47 in 45 48 let encode frame start len = 46 49 let start = Frame.audio_of_master start in 47 50 let b = AFrame.content_of_type ~channels frame start in 48 51 let len = Frame.audio_of_master len in 49 let s = String.create (2 * len * channels) in50 ignore (Float_pcm.to_s16le b start len s 0) ;51 52 if channels = 1 then 52 53 Lame.encode_buffer_float_part e b.(0) b.(0) start len
