cmScoreProc.c : Updated the TakeSeqBldr JSON file generation code to match the

file parser code in cmTakeSeqBldr.c.

app/cmScoreProc.c

   unsigned       mni;
   bool           failFl;
   cmJsonH_t      jsH;
+  cmJsonNode_t*  takeArray;
   cmJsonNode_t*  takeObj;
   cmJsonNode_t*  array;
-
+  
   cmSpAssoc_t*   bap;  
   cmSpAssoc_t*   eap;
   cmSpNoteMap_t* bmp;
         m->mni    = 0;
         m->failFl = false;
 
-        // insert a section object
-        if((m->takeObj = cmJsonInsertPairObject(m->jsH, cmJsonRoot(m->jsH), "take" )) == NULL )
+        // insert a take object
+        if((m->takeObj = cmJsonCreateObject(m->jsH, m->takeArray )) == NULL )
         {
           rc = cmErrMsg(&m->ctx->err,kJsonFailSpRC,"Take insert failed on seq:%i '%s' : '%s'.", tlObjPtr->seqId, cmStringNullGuard(tlObjPtr->text),cmStringNullGuard(markPtr->text));
           goto errLabel; 
 
   // store the time-line and score file name
   if( cmJsonInsertPairs(m->jsH, cmJsonRoot(m->jsH), 
-      "tlFn",    kStringTId, cmTimeLineFileName( sp->tlH),
-      "scoreFn", kStringTId, cmScoreFileName( sp->scH ),
+      "timeLineFn",    kStringTId, cmTimeLineFileName(   sp->tlH),
+      "scoreFn",       kStringTId, cmScoreFileName(      sp->scH ),
+      "tlPrefixPath",  kStringTId, cmTimeLinePrefixPath( sp->tlH ),
       NULL ) != kOkJsRC )
   {
     cmErrMsg(&m->ctx->err,kJsonFailSpRC,"File name JSON field insertion failed.");
     goto errLabel;
   }
 
+  // create an array to hold each take
+  if((m->takeArray = cmJsonInsertPairArray(m->jsH, cmJsonRoot(m->jsH), "takeArray" )) == NULL )
+  {
+    cmErrMsg(&m->ctx->err,kJsonFailSpRC,"JSON take-array create failed.");
+    goto errLabel;
+  }
+
   // run the score processor
   _cmScoreProcProcess(ctx,sp);