[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Denemo-devel] [bug #28047] Pasting Oddities

From: Richard Shann
Subject: [Denemo-devel] [bug #28047] Pasting Oddities
Date: Sat, 21 Nov 2009 18:00:15 +0000
User-agent: Mozilla/5.0 (X11; U; Linux i686; en; rv: Gecko/20080528 Epiphany/2.22

Follow-up Comment #2, bug #28047 (project denemo):

I have a prototype paste script using the latest git
I would like feedback on how it could be improved.

(let loop ((type #f) (staff 0) (count 0))
  (set! type (d-GetClipObjType staff count))
  (format #t "type is ~a staff ~a count ~a~%" type staff count)
    ((= type MEASUREBREAK)      
        (if (= staff 0)
        (loop type staff (1+ count)))
   ((= type STAFFBREAK)
           (if (d-StaffDown)
                 (loop type (1+ staff) 0))))
    ((>= type 0)
     (d-PutClipObj staff count)
     (loop type staff (1+ count)))))


Reply to this item at:


  Message sent via/by Savannah

reply via email to

[Prev in Thread] Current Thread [Next in Thread]