mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 15:28:01 +02:00
+ updated t_jack.h2paschk with the new ringbuffer structures
This commit is contained in:
parent
846250b831
commit
decb6ab3c6
@ -7,10 +7,11 @@
|
||||
# the Pascal program produces the same output as the C program for each
|
||||
# supported architecture.
|
||||
|
||||
@Pascal uses jack;
|
||||
@Pascal uses jack, jackringbuffer;
|
||||
@Pascal begin
|
||||
|
||||
@C #include <jack/jack.h>
|
||||
@C #include <jack/ringbuffer.h>
|
||||
@C #include <stdio.h>
|
||||
@C #include <stddef.h>
|
||||
@C int main()
|
||||
@ -109,6 +110,18 @@
|
||||
.ticks_per_beat
|
||||
.beats_per_minute
|
||||
|
||||
@record jack_ringbuffer_data_t
|
||||
.buf
|
||||
.len
|
||||
|
||||
@record jack_ringbuffer_t
|
||||
.buf
|
||||
.write_ptr
|
||||
.read_ptr
|
||||
.size
|
||||
.size_mask
|
||||
.mlocked
|
||||
|
||||
@C return 0;
|
||||
@C }
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user