// returns true if change

sbool _csetField(Concept c, S field, O value) ctex {

  Field f = setOpt_findField(c.getClass(), field);

  //print("cset: " + c.id + " " + field + " " + struct(value) + " " + f);

  if (value instanceof RC) value = c._concepts.getConcept((RC) value);

  value = deref(value);

  if (value instanceof S && l((S) value) >= concepts_internStringsLongerThan) value = intern((S) value);

  if (f == null) {

    // TODO: keep ref if it exists

    c.fieldValues = syncMapPut2_createLinkedHashMap(c.fieldValues, assertIdentifier(field), value instanceof Concept ? c.new Ref((Concept) value) : value);

    c.change();

  } else if (isSubtypeOf(f.getType(), Concept.Ref.class)) {

    // Concept.Ref magic

    ((Concept.Ref) f.get(c)).set((Concept) derefRef(value));

    c.change(); true;

  } else if (isSubtypeOf(f.getType(), Concept.RefL.class)) {

    // Concept.RefL magic

    ((Concept.RefL) f.get(c)).replaceWithList(lmap derefRef((L) value));

    c.change(); true;

  } else {

    O old = f.get(c);

    if (neq(value, old)) {

      f.set(c, value);

      if (!isTransient(f)) c.change(); 

      true;

    }

  }

  false;

}