equal
deleted
inserted
replaced
251 in |
251 in |
252 if check ctxt (name, pos) then |
252 if check ctxt (name, pos) then |
253 idx ^ |
253 idx ^ |
254 (Output.output name |
254 (Output.output name |
255 |> (if markup = "" then I else enclose ("\\" ^ markup ^ "{") "}") |
255 |> (if markup = "" then I else enclose ("\\" ^ markup ^ "{") "}") |
256 |> (if Config.get ctxt Thy_Output.quotes then quote else I) |
256 |> hyper o enclose "\\mbox{\\isa{" "}}") |
257 |> (if Config.get ctxt Thy_Output.display |
|
258 then enclose "\\begin{isabelle}%\n" "%\n\\end{isabelle}" |
|
259 else hyper o enclose "\\mbox{\\isa{" "}}")) |
|
260 else error ("Bad " ^ kind ^ " " ^ quote name ^ Position.here pos) |
257 else error ("Bad " ^ kind ^ " " ^ quote name ^ Position.here pos) |
261 end); |
258 end); |
262 |
259 |
263 fun entity_antiqs check markup kind = |
260 fun entity_antiqs check markup kind = |
264 entity check markup kind NONE #> |
261 entity check markup kind NONE #> |