* @return Keyword
   */
  public static Keyword inDialect(Stella_Object dialect) {
    { Surrogate testValue000 = Stella_Object.safePrimaryType(dialect);

      if (Surrogate.subtypeOfSymbolP(testValue000)) {
        { Symbol dialect000 = ((Symbol)(dialect));

          Native.setSpecial(Logic.$LOGIC_DIALECT$, dialect000.keywordify());
        }
      }
      else if (Surrogate.subtypeOfStringP(testValue000)) {
        { StringWrapper dialect000 = ((StringWrapper)(dialect));

          Native.setSpecial(Logic.$LOGIC_DIALECT$, Stella.string_keywordify(dialect000.wrapperValue));
        }
      }
      else if (Surrogate.subtypeOfKeywordP(testValue000)) {
        { Keyword dialect000 = ((Keyword)(dialect));

          Native.setSpecial(Logic.$LOGIC_DIALECT$, dialect000);
        }
      }
      else {
        Stella.STANDARD_WARNING.nativeStream.println("Warning: IN-DIALECT: Illegal dialect specification: `" + dialect + "'");
      }
    }
    return (((Keyword)(Logic.$LOGIC_DIALECT$.get())));
  }