Update of /cvsroot/alsa/alsa-kernel/core/seq/oss
In directory sc8-pr-cvs1:/tmp/cvs-serv17731

Modified Files:
        seq_oss_midi.c 
Log Message:
First attempt to get timestamps

Index: seq_oss_midi.c
===================================================================
RCS file: /cvsroot/alsa/alsa-kernel/core/seq/oss/seq_oss_midi.c,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- seq_oss_midi.c      19 Dec 2002 15:59:18 -0000      1.9
+++ seq_oss_midi.c      11 Mar 2003 15:04:22 -0000      1.10
@@ -372,6 +372,8 @@
                subs.sender.client = mdev->client;
                subs.sender.port = mdev->port;
                subs.dest = dp->addr;
+               subs.flags = SNDRV_SEQ_PORT_SUBS_TIMESTAMP;
+               subs.queue = dp->queue;         /* queue for timestamps */
                if (snd_seq_kernel_client_ctl(dp->cseq, 
SNDRV_SEQ_IOCTL_SUBSCRIBE_PORT, &subs) >= 0)
                        mdev->opened |= PERM_READ;
        }
@@ -597,10 +599,12 @@
 static int
 send_midi_event(seq_oss_devinfo_t *dp, snd_seq_event_t *ev, seq_oss_midi_t *mdev)
 {
-       char msg[32]; /* enough except for sysex? */
+       char msg[32];
        int len;
        
-       snd_seq_oss_readq_put_timestamp(dp->readq, 
snd_seq_oss_timer_cur_tick(dp->timer), dp->seq_mode);
+       snd_seq_oss_readq_put_timestamp(dp->readq, ev->time.tick, dp->seq_mode);
+       if (!dp->timer->running)
+               len = snd_seq_oss_timer_start(dp->timer);
        if (ev->type == SNDRV_SEQ_EVENT_SYSEX) {
                if ((ev->flags & SNDRV_SEQ_EVENT_LENGTH_MASK) == 
SNDRV_SEQ_EVENT_LENGTH_VARIABLE)
                        snd_seq_oss_readq_puts(dp->readq, mdev->seq_device,



-------------------------------------------------------
This SF.net email is sponsored by:Crypto Challenge is now open! 
Get cracking and register here for some mind boggling fun and 
the chance of winning an Apple iPod:
http://ads.sourceforge.net/cgi-bin/redirect.pl?thaw0031en
_______________________________________________
Alsa-cvslog mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/alsa-cvslog

Reply via email to