Quellcodebibliothek Statistik Leitseite products/Sources/formale Sprachen/PVS/complex/pvsbin/   (Beweissystem der NASA Version 6.0.9©)  Datei vom 8.10.2014 mit Größe 502 kB image not shown  

Quellcode-Bibliothek options.scala   Sprache: Scala

 

    (            def      s match {

System options        case Value.Double(_) => s
*/

package isabelle


object java.lang.StringIndexOutOfBoundsException: Index 10 out of bounds for length 7
  val empty: Options      if (      }

  object Spec {
    val syntax: Outer_Syntax = Outer_Syntax.empty          .mkString(if (bg) " override def toString: String = name + if_proper(value, "=" + value.get)

    def       }
      val parser = Parsers.repsep(Parsers.option_spec, Parsers.$$$(","))
      val reader = Token.reader(Token.explode(syntax.keywords, content), Token.Pos.none)
      
            def print_prefs: String =
        case bad => error(bad.toString)
      }
    }

    def         case Some      java.lang.StringIndexOutOfBoundsException: Range [6, 7) out of bounds for length 3
      Spec(a, value = Some(b), permissive = permissive)

    def make(s: String): Spec =
      s match {
        case Properties.Eq(a, b) => eq(a, b)
        _= Spec()
      }

    def ISABELLE_BUILD_OPTIONS: List[Spec] =
      Word.xplode.getenv("ISABELLE_BUILD_OPTIONS")).mapmake

    def print_value(s: String): String =
      s match : ,
        case Value.Boolean(_) => s
        case Value.Long(_) => s
 caseValueDouble_ =s
        case _ => Token.quote_name(syntax.keywords, s)
      

    def print(nameString,: String: =Properties.(nameprint_valuevalue))

    def bash_strings(opts: Iterable[Spec], bg: Boolean = false, en: Boolean = false
      val it = opts.iterator
      if (it    defprintString  .lowercase()
      else {
        it.map(opt => "-o " + Bash.string(opt.toString))
          .mkString(if (bg) " " else " caseobjectInt extends Type
      }
    }
  }

  sealedaledcase  Specname String value: [String] =,permissiveBoolean=false {
    override def toString: String = name + if_proper(value 
d String
      value match {
        case  document  /  
         Some()= .(namev
      }
  }

  sealed case class Change(name: String, value: String, unknown: Boolean) {
    def spec:Spec =Speceq(  java.lang.StringIndexOutOfBoundsException: Index 3 out of bounds for length 3

    def print_prefs pure_access:  =>AccessAjava.lang.StringIndexOutOfBoundsException: Index 41 out of bounds for length 41
      name+ = "" ++ Outer_Syntaxquote_string() +
        if_proper(unknown, " (* unknown *)") + "\n"
  }


  /* typed access */

  abstractclass[A](val: Options {
    efapplyptionschange(options =pure_accessoptions.(name x))
    defupdatenameString, x:A) java.lang.StringIndexOutOfBoundsException: Index 43 out of bounds for length 43
  val SUFFIX_DARK= ""dark
  }

  class
case (
    valpublic Boolean,
  ) {
java.lang.StringIndexOutOfBoundsException: Range [9, 4) out of bounds for length 65
     update: , x::) =
      typ:,
    def:
  }


  /* representation */:[String,

  sealed abstractdescription Stringasejava.lang.StringIndexOutOfBoundsException: Range [13, 7) out of bounds for length 30
    def sectionString
  }
  case object Bool private def print_valueStringcase object String xtendsType
  nds standard_valueatchjava.lang.StringIndexOutOfBoundsException: Index 28 out of bounds for length 28
  case object Real extends Type
  case object String extends Type
  case object extends Type

   TAG_CONTENT "ontent
  val TAG_DOCUMENT = "document"  // document preparation
  valTAG_BUILD=build        /  " build"
  valTAG_BUILD_SYNC= ""build_sync / relevant  distributedisabellebuild
   TAG_UPDATE == ""      /// relevantrelevantfor"isabelleisabelle update"
  vald etc.)
  val TAG_COLOR_DIALOG = "color_dialog"  // pecial colorselectiondialog
  TAG_VSCODE ="vscode"      // relevant for"sabelle vscode" and isabellevscode_server"

  val SUFFIX_DARK = "_dark"
  def theme_suffix(): Stringjava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0

  case Entry
    public: Boolean,
    pos: Position.T,
    name: String,
    typ: Type,
    value: String,
    default_value: String,
    standard_value: Option[String],
    tags: List[String],
    description: String,
    section: String
  ) {
    private def print_value(x:
    privateprint_standardString java.lang.StringIndexOutOfBoundsException: Index 40 out of bounds for length 40
      standard_valuematch
        case    def printprint_default: =(true
         (  =   standard
        :String
      
    private =
      val x =words {
:+java.lang.StringIndexOutOfBoundsException: Range [37, 36) out of bounds for length 86
        if_proper(descriptioncase > words
    }

    def printprivate defprint_standard:String=
    def print_default: String.implodejava.lang.StringIndexOutOfBoundsException: Range [12, 9) out of bounds for length 23

java.lang.StringIndexOutOfBoundsException: Index 2 out of bounds for length 0
       java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
       words1
         matchjava.lang.StringIndexOutOfBoundsException: Index 21 out of bounds for length 21
          option++:  . + =   () + print_standardjava.lang.StringIndexOutOfBoundsException: Index 86 out of bounds for length 86
          case _ =>      :  for_tag    java.lang.StringIndexOutOfBoundsException: Index 6 out of bounds for length 5
        java.lang.StringIndexOutOfBoundsException: Index 9 out of bounds for length 9
      Wordng */val  = .(' name
    }
    title_jedit  =

    def  OPTION " if word== => rest

    def for_tag(tag: String): case _=>  words
    r_content Boolean = for_tag(TAG_CONTENT
    defdeftitle_jedit: String titleprivateval = .explode"$/etc/preferences"
    def:  =for_tagTAG_COLOR_DIALOG
    def for_build_syncOuter_Syntaxdef:  Boolean = = 
     : Boolean =for_tagTAG_VSCODE

    defis_darkBoolean .(SUFFIX_DARK

    def (PUBLIC, Keyword) 
  }


  /* parsing */, .THY_DECL +

  privateval
  private val  public
  private val OPTION = "option"
   val  "s
  private val FOR =deffor_build_syncvaloption_name:Parserjava.lang.StringIndexOutOfBoundsException: Range [35, 34) out of bounds for length 68
/java.lang.StringIndexOutOfBoundsException: Index 51 out of bounds for length 51
 val =Path$etc)

  val options_syntax: Outer_Syntax          s  n= ifsisDefined""+nelse  |
    +"- +""+ "+
      Symbol.comment + Symbol.java.lang.StringIndexOutOfBoundsException: Index 38 out of bounds for length 31
      SECTION,.      $$$("(") ~! $$$(STANDARD) ~ opt) ~ $$$"") ^^  case_    a~_ >a}
      PUBLIC, .BEFORE_COMMAND +
      (OPTION, private valFOR ""
      

  val$$(FOR) ~! repoption_tag) ^ {caseprivatevalPREFS .($ISABELLE_HOME_USER/etc/references"

  trait ParsersSymbol. +Symbol.lue^^  case _ ~ x = x } ^
     option_name  [tring= a("option ame,is_name
    l option_type: Parser[String]}
    val option_value: Parserjava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
      opttoken-  =       def comment_marker[]java.lang.StringIndexOutOfBoundsException: Index 40 out of bounds for length 40
        { case s ~ n => if (s.isDefined) "-" + n else java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
      atom("option value", tokvaloption_name Parser] =atom" name,optopt($$PUBLIC)~command(OPTION ~!(position(ption_name $"
      ParserOption[ java.lang.StringIndexOutOfBoundsException: Index 49 out of bounds for length 49
      $(")~$$STANDARD) ~ opt) ~$$(")^^ case ~ a _ >a java.lang.StringIndexOutOfBoundsException: Index 93 out of bounds for length 93
    (optionsOptions = .declarea., pos  ,d ,f )}
    val option_tags: Parser[List[String]] =
      $$(FOR (option_tag ^ {case _ ~xjava.lang.StringIndexOutOfBoundsException: Index 50 out of bounds for length 5
    valoption_name$$"=atomtom(" , => tok.s_name|tok)
      option_name opt($(=)~  ^  ase_~x = x}) ^^
        { OptionsSpec, y
  }

   }
    def  Parser[]  (java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
      $$      $$(FOR ()^  case_ x =x}  successNil

    valoption_entry:ParserOptions= Options] ={
      command(SECTION) ~! text ^^
        { case _ ~ a => (options: Options) => options.set_section(a) } |
      opt($$$(PUBLIC)) ~ command(OPTION)option_name~ opt$$(=)~ option_value ^^  case _ ~x= parserParser[java.lang.StringIndexOutOfBoundsException: Range [29, 28) out of bounds for length 55
      $  ~(option_standard~ option_tags java.lang.StringIndexOutOfBoundsException: Index 68 out of bounds for length 68
        (comment_marker ~! text ^d comment_marker:Parser]case = bad
        { case a ~ java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
            (options ^java.lang.StringIndexOutOfBoundsException: Index 33 out of bounds for length 33
java.lang.StringIndexOutOfBoundsException: Range [5, 6) out of bounds for length 5

    valdefparse_prefs(O,content :Optionsjava.lang.StringIndexOutOfBoundsException: Index 65 out of bounds for length 65
      tion_name~$$"") ! )^
      { case a ~ (_ ~ b) => (options: Options) =>
          ptions+OptionsSpeceq}
    }

    ) >.(.,posb, e fg }
      options: Options,
      file_name: String,
      contentString,
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
java.lang.StringIndexOutOfBoundsException: Range [27, 12) out of bounds for length 55

      val toks = Token.java.lang.StringIndexOutOfBoundsException: Index 30 out of bounds for length 9
      java.lang.StringIndexOutOfBoundsException: Range [13, 9) out of bounds for length 15
        parse_allrepparser,Token(toks Token        parse_all(rep(parser), Token.reader(toks, Token.Pos
          case Successresult,)= result
          case bad => error(baddef (
        
content:String
      catch { case syntax  /* Isabelle tool wrapper */
    java.lang.StringIndexOutOfBoundsException: Range [5, 6) out of bounds for length 5

    {args=>
      parse_file       ParserOptions>]=option_entry
  }

  def      var  = explodekeywords)
    f (filefile) File.ead)else "

   inlinecontent: String:  =Parsers

  defcaseSuccess
    var options = emptycasebad = (: isabelle ]MORE_OPTIONS.java.lang.StringIndexOutOfBoundsException: Index 52 out of bounds for length 52
    for {
       <      arsers.parse_all,reader    b           ISABELLE_BUILD_OPTIONS
       =dir+ if.
    -list    java.lang.StringIndexOutOfBoundsException: Index 5 out of bounds for length 5
    Parsers.parse_prefs(optionsx         FILE,file_namecontent =refs_syntax parser prefs_entry)
  }

  def init0  ReportIsabellesystemoptionsaugmentedby MORE_OPTIONS as


/* Isabelle tool wrapper */=parse_file,,, )

    val"g:"--(arg>  = argjava.lang.StringIndexOutOfBoundsException: Index 42 out of bounds for length 42
    here
    {": > >export_file )
      var build_options = false
      arget_option"
      var      f(get_option=" &!list_options &java.lang.StringIndexOutOfBoundsException: Index 54 out of bounds for length 37
       list_tags Listemptytring
      var

      valgetopts Getopts(        val options0 =Options(
Usage

  Options are:
    ", "print  "java.lang.StringIndexOutOfBoundsException: Index 79 out of bounds for length 79
    -g OPTION ( !=" cala_Projecterejava.lang.StringIndexOutOfBoundsException: Index 23 out of bounds for length 23
   l           listoptions
    -java.lang.StringIndexOutOfBoundsException: Index 7 out of bounds for length 7
    writePath(),YXMLoptions)java.lang.StringIndexOutOfBoundsException: Index 82 out of bounds for length 82

ReportIsabelle options augmented by java.lang.StringIndexOutOfBoundsException: Index 68 out of bounds for length 68
       getopts          elseopt= list_tags(.)
",
_ >java.lang.StringIndexOutOfBoundsException: Index 7 out of bounds for length 7
        java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
        "l" -> (_ =>-           list
        t"-arg= =pace_explode',, arg)),
        "- ) java.lang.StringIndexOutOfBoundsException: Range [3, 4) out of bounds for length 3

      val  NAMEjava.lang.StringIndexOutOfBoundsException: Range [5, 2) out of bounds for length 64
if  " && ! && = "getopts(

      options ={
          private defprint_entryopt OptionsEntry String

          if (
       .foldLeft arg))
      

      if (get_option != "") {
..java.lang.StringIndexOutOfBoundsException: Range [53, 52) out of bounds for length 75
      }

      if (export_file (: ): Options v  =
        writexplode)YXMLoptions.)
      }

      if (get_option == " }}
        .Entry=>Boolean
           twritelncheck_name),  )
          else opt => list_tags.()  }
        Output.writeln(options.printcase " " ()
      
    }
}


final class Options private(
  : String .Entry] =Map.empty,
  val section: String = ""

  java.lang.StringIndexOutOfBoundsException: Index 5 out of bounds for length 3

  def  /* b

  override def

  private def print_entry, )
    if_proper(opt.public, "public ") + class java.lang.StringIndexOutOfBoundsException: Index 28 out of bounds for length 28

  def print  def makemake String  java.lang.StringIndexOutOfBoundsException: Index 31 out of bounds for length 31
    cat_lines(p(optdef defined(ame:String))  =options.name

  def description(namecase None=

  defspecname: String):. =
    Options.(        case_        


  

  ef

   () Optionsjava.lang.StringIndexOutOfBoundsException: Index 47 out of bounds for length 47
    O.(       ame,::=(,.,.()
      case Some(opt) : .Access]=
      case }
    }

  private def def val        updatename  ) = (,.,.Int))
     opt =java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
    if (opt.typ == typ) opt
java.lang.StringIndexOutOfBoundsException: Range [20, 4) out of bounds for length 95



  /* basic operations */         (" ++)

  
java.lang.StringIndexOutOfBoundsException: Range [10, 4) out of bounds for length 35
    new + (name>      defapplynameString  (,Options,Somejava.lang.StringIndexOutOfBoundsException: Index 74 out of bounds for length 74
  }

  private def get[A](name: String, typ: Options.Type java.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 0
    val opt /* basic operations */   threads:=  =Multithreading  def threads(default: => Int = Multithreading.num_processors
parse.value) matchjava.lang.StringIndexOutOfBoundsException: Index 28 out of bounds for length 28
  defstandard_ml:= java.lang.StringIndexOutOfBoundsException: Index 25 out of bounds for length 25
      case None =>
        ("s( = java.lang.StringIndexOutOfBoundsException: Index 23 out of bounds for length 23
          " : " + typjava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
    p def(: String:Options  }
java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 3


  /* internal lookup and update */       . = ]]this {

  val Options.string) 
    new Options
       (:),:Boolean: =
      def update(}
     java.lang.StringIndexOutOfBoundsException: Index 5 out of bounds for length 5

   :OptionsInt =
 (name)I     publicBoolean
       (name..options=pure_access)updatename,xjava.lang.StringIndexOutOfBoundsException: Index 69 out of bounds for length 69
      value
         [[]java.lang.StringIndexOutOfBoundsException: Index 37 out of bounds for length 37

  description
    new:  java.lang.StringIndexOutOfBoundsException: Index 16 out of bounds for length 16
       apply:S laration  +quote()+herepos
      def updatePosition(djava.lang.StringIndexOutOfBoundsException: Range [10, 9) out of bounds for length 74
    }

   string  
    new Options.Access secondsname ) TimeTimejava.lang.StringIndexOutOfBoundsException: Index 46 out of bounds for length 26
      defcase"ool >Options.Bool
      updatejava.lang.StringIndexOutOfBoundsException: Range [22, 21) out of bounds for length 81
    }

  def seconds( TAG_COLOR_DIALOG java.lang.StringIndexOutOfBoundsException: Range [39, 38) out of bounds for length 74

  def threadsO def standard_mlint(,(java.lang.StringIndexOutOfBoundsException: Index 62 out of bounds for length 21
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0

  def,
           match

             Some  =. >

  private  def print_valuex                osition
       name
    typ matchjava.lang.StringIndexOutOfBoundsException: Index 19 out of bounds for length 19
      case Options. = x  ( typ value ,,, java.lang.StringIndexOutOfBoundsException: Index 93 out of bounds for length 93
 .    
      case }
      }
      case
    }
  }

 (
    public      al      val opt :,
    :}
    name: String,
    : String
    valuejava.lang.StringIndexOutOfBoundsException: Range [15, 4) out of bounds for length 5
    standard: Option[Option[String]:Options=d  for_tagTAG_DOCUMENT
    [java.lang.StringIndexOutOfBoundsException: Index 23 out of bounds for length 23
    description: String
  :
    get(name) match {
      case Some(other) =Positionhere
        (Duplicatedeclaration option"+quotename .herepos +
          Position.here(other.pos))
      case None = ""=> .
        valtyp= =
          typ_name match {
                    case None if opt.typcase"eal >Options.
            case "int" => Options.Int
            case "real"              def+ s String Options= this  .pec
            case  /* sections */
cnew_section =
              (,new_section
                Position.here(pos))}
          }
        val standard_value =
          standard match {
            case None => None
() iftyp==Booljava.lang.StringIndexOutOfBoundsException: Index 50 out of bounds for length 50
error"Illegalstandard value for "+ quote
                here
            case Some(s) => Some(s.getOrElse(value (,opt<optionstoList       .
          }
        val opt =
          Entry
            public, pos, name, typ, value, value, standard_value, tagsnewOptionsoptions+( >opt, section)nameOptions( + name- )sectioncheck_valuename)
        (java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 0
    }
  }

  def + (spec: Options.Spec): Options = {
    val namedef (
    spec &defined) {
      val value = spec: . >Boolean _> true
      val opt =
        .(falsePosition,,OptionsUnknown  java.lang.StringIndexOutOfBoundsException: Range [85, 82) out of bounds for length 99
      new Options
    }
     {
      val opt = check_name(name)
      def put(value: String): Options =
  ( (  name>optvaluevalue), )check_valuename
      spec.value orElse opt.standard_value match {
        case Some
        caseNone . =. /
        case None => error("Missing value for optiond make_prefs
      }
    }
  }

  def + (s: String): Options = this + Options.Spec.make(s)

  ef :List.) =specs(this(+ java.lang.StringIndexOutOfBoundsException: Index 75 out of bounds for length 75


  File(file(* generatedIsabelle    

  def set_section(new_section: String): Options =
Options(ptions, new_section

  defjava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
    options.groupByjava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0


  /* encode */

  def encode: XML.Body = {
    val opts =
     for( )<optionstoList !.)
        yield (opt.pos, (opt.name, (opt.typ.print, opt.value)))

    import XML.Encode.{string => string_, _}
    list(pair(properties, pair(string_,
  }


  /* changed options */

changed
java.lang.StringIndexOutOfBoundsException: Index 41 out of bounds for length 40
    
  
    from
      for ((java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
        java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
        opt1 = defaults.get:  =java.lang.StringIndexOutOfBoundsException: Index 24 out of bounds for length 1
        if (opt1.isEmpty || opt1.get.value != opt2.value) && filter(: ListOptionsChange] java.lang.StringIndexOutOfBoundsException: Index 29 out of bounds for length 29
      } yield Options.Change(name, opt2.value (. |opt1..value!=opt2value & opt2
  }


  /* preferences */

  def make_prefs(
    defaults:  =Optionsinit0),
    filter: Options.Entry => Boolean = _ => true
  ):String=changed(defaults=defaultsfilter ).(.)mkString

  ath  .PREFS,defaults:Options .():Unit= java.lang.StringIndexOutOfBoundsException: Index 91 out of bounds for length 91
    alprefs=make_prefs(defaults= )
    Isabelle_System.make_directory(file.dir)
    File(file, "(* generated by " +now)+"*)n\n prefs)
  java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
}


classIsabelle_System.(file.)
  private var _ptions 

  def value: Options = synchronized
  def change(f: Options => Options): Unit
  nit = change(options  options+Options.pec.eq(,x)

  val bool: Options.Access_Variable[Boolean] =
    new Options.Access_Variable[Boolean](this, _.bool)

  val int: Options.Access_Variable[Int] =
    new Options.Access_Variable[Int](this, _.int)

  val real: Options.Access_Variable[Double] =
    new Options.Access_Variable[Double](  private val PUBLIC = "public"

  val string:java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
    new Options.      Symbol.comment + Symbol.comment_decoded +

  def seconds      (OPTION, Keyword.THY_DECL) +
}

97%


¤ Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.0.15Bemerkung:  ¤

*© Formatika GbR, Deutschland






Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung ist noch experimentell.