src/Pure/System/isabelle_system.ML
changeset 74336 7bb0ac635397
parent 74212 a1ccecae6a57
child 75577 c51e1cef1eae
equal deleted inserted replaced
74335:eb54c0604ca5 74336:7bb0ac635397
   178     NONE => ""
   178     NONE => ""
   179   | SOME version => " (" ^ version ^ ")");
   179   | SOME version => " (" ^ version ^ ")");
   180 
   180 
   181 fun isabelle_name () = getenv_strict "ISABELLE_NAME";
   181 fun isabelle_name () = getenv_strict "ISABELLE_NAME";
   182 
   182 
   183 fun identification () = "Isabelle/" ^ isabelle_id () ^ isabelle_heading ();
   183 fun identification () =
       
   184   "Isabelle" ^ (case try isabelle_id () of SOME id => "/" ^ id | NONE => "") ^ isabelle_heading ();
   184 
   185 
   185 end;
   186 end;