<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_6gkdrt3d2u1fn1p8nmbr66edoo, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
!7

concept Musing {
  S text;
  S verificationResult;
  
  sS _fieldOrder = "text verificationResult";
}

cmodule AIMusingsCRUD > DynCRUD<Musing> {
  // API
  
  void storeMusing(S text) {
    storeMusing(text, null);
  }
  
  void storeMusing(S text, S verificationResult) {
    Musing m = uniq Musing(+text);
    if (nempty(verificationResult)) cset(m, +verificationResult);
  }
  
  void testMusing(Musing m) {
    if (m == null) ret;
    try {
      int n = ai_checkMusing(m.text);
      cset(m, verificationResult := "OK (" + n + ")");
    } catch e {
      cset(m, verificationResult := "ERROR: " + e);
    }
  }
  
  start {
    crud.multiLineFields = litset("text");
  }
  
  afterVisualize {
    addSelectionDependentButton("Test", r { testMusing(selected()) });
  }
}