std/filters/test: add simple processing callback to arrRecord

src/std/filters/test/arrRecord.c

@@ -97,6 +97,12 @@ static long init_record(arrRecord *prec, int pass)
 
 static long process(arrRecord *prec)
 {
+    if(prec->clbk)
+        (*prec->clbk)(prec);
+    prec->pact = TRUE;
+    recGblGetTimeStamp(prec);
+    recGblFwdLink(prec);
+    prec->pact = FALSE;
     return 0;
 }
 

src/std/filters/test/arrRecord.dbd

@@ -31,4 +31,9 @@ recordtype(arr) {
     special(SPC_NOMOD)
     extra("void *bptr")
   }
+  field(CLBK, DBF_NOACCESS) {
+    prompt("Processing callback")
+    special(SPC_NOMOD)
+    extra("void (*clbk)(struct arrRecord*)")
+  }
 }