texlive[73498] Master/texmf-dist: piton (18jan25)
commits+karl at tug.org
commits+karl at tug.org
Sat Jan 18 22:03:10 CET 2025
Revision: 73498
https://tug.org/svn/texlive?view=revision&revision=73498
Author: karl
Date: 2025-01-18 22:03:09 +0100 (Sat, 18 Jan 2025)
Log Message:
-----------
piton (18jan25)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.pdf
trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.tex
trunk/Master/texmf-dist/doc/lualatex/piton/piton.pdf
trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx
trunk/Master/texmf-dist/source/lualatex/piton/piton.ins
trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua
trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty
Modified: trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.tex
===================================================================
--- trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.tex 2025-01-18 10:20:22 UTC (rev 73497)
+++ trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.tex 2025-01-18 21:03:09 UTC (rev 73498)
@@ -2902,7 +2902,42 @@
\end{center}
+\vspace{1cm}
+Voici une possibilité de définition d'un language HTML, obtenu par une légère adaptation
+de la définition faite par \pkg{listings} (fichier |lstlang1.sty|).
+\medskip
+\begin{Verbatim}[formatcom=\small]
+\NewPitonLanguage{HTML}%
+ {morekeywords={A,ABBR,ACRONYM,ADDRESS,APPLET,AREA,B,BASE,BASEFONT,%
+ BDO,BIG,BLOCKQUOTE,BODY,BR,BUTTON,CAPTION,CENTER,CITE,CODE,COL,%
+ COLGROUP,DD,DEL,DFN,DIR,DIV,DL,DOCTYPE,DT,EM,FIELDSET,FONT,FORM,%
+ FRAME,FRAMESET,HEAD,HR,H1,H2,H3,H4,H5,H6,HTML,I,IFRAME,IMG,INPUT,%
+ INS,ISINDEX,KBD,LABEL,LEGEND,LH,LI,LINK,LISTING,MAP,META,MENU,%
+ NOFRAMES,NOSCRIPT,OBJECT,OPTGROUP,OPTION,P,PARAM,PLAINTEXT,PRE,%
+ OL,Q,S,SAMP,SCRIPT,SELECT,SMALL,SPAN,STRIKE,STRING,STRONG,STYLE,%
+ SUB,SUP,TABLE,TBODY,TD,TEXTAREA,TFOOT,TH,THEAD,TITLE,TR,TT,U,UL,%
+ VAR,XMP,%
+ accesskey,action,align,alink,alt,archive,axis,background,bgcolor,%
+ border,cellpadding,cellspacing,charset,checked,cite,class,classid,%
+ code,codebase,codetype,color,cols,colspan,content,coords,data,%
+ datetime,defer,disabled,dir,event,error,for,frameborder,headers,%
+ height,href,hreflang,hspace,http-equiv,id,ismap,label,lang,link,%
+ longdesc,marginwidth,marginheight,maxlength,media,method,multiple,%
+ name,nohref,noresize,noshade,nowrap,onblur,onchange,onclick,%
+ ondblclick,onfocus,onkeydown,onkeypress,onkeyup,onload,onmousedown,%
+ profile,readonly,onmousemove,onmouseout,onmouseover,onmouseup,%
+ onselect,onunload,rel,rev,rows,rowspan,scheme,scope,scrolling,%
+ selected,shape,size,src,standby,style,tabindex,text,title,type,%
+ units,usemap,valign,value,valuetype,vlink,vspace,width,xmlns},%
+ tag=<>,%
+ alsoletter = - ,%
+ sensitive=f,%
+ morestring=[d]",
+ }
+\end{Verbatim}
+
+
\newpage
\subsection{Le langage «minimal»}
Modified: trunk/Master/texmf-dist/doc/lualatex/piton/piton.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx
===================================================================
--- trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx 2025-01-18 10:20:22 UTC (rev 73497)
+++ trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx 2025-01-18 21:03:09 UTC (rev 73498)
@@ -1,7 +1,7 @@
% \iffalse -*- coding: utf-8 ; -*- \fi
% \iffalse meta-comment
%
-% Copyright (C) 2022-2024 by F. Pantigny
+% Copyright (C) 2022-2025 by F. Pantigny
% -----------------------------------
%
% This file may be distributed and/or modified under the
@@ -79,12 +79,12 @@
% \iffalse
%<*STY>
% \fi
-\def\PitonFileVersion{4.2a}
-\def\PitonFileDate{2024/12/06}
+\def\PitonFileVersion{4.2b}
+\def\PitonFileDate{2025/01/18}
% \iffalse
%</STY>
%<*LUA>
-piton_version = "4.2a" -- 2024/12/06
+piton_version = "4.2b" -- 2025/01/18
%</LUA>
%\fi
%
@@ -2680,8 +2680,43 @@
% \end{center}
%
%
+%\vspace{1cm}
+% Here is for example a definition for the language HTML, obtained with a slight
+% adaptation of the definition done by \pkg{listings} (file |lstlang1.sty|).
%
+% \medskip
+% \begin{Verbatim}[formatcom=\small]
+% \NewPitonLanguage{HTML}%
+% {morekeywords={A,ABBR,ACRONYM,ADDRESS,APPLET,AREA,B,BASE,BASEFONT,%
+% BDO,BIG,BLOCKQUOTE,BODY,BR,BUTTON,CAPTION,CENTER,CITE,CODE,COL,%
+% COLGROUP,DD,DEL,DFN,DIR,DIV,DL,DOCTYPE,DT,EM,FIELDSET,FONT,FORM,%
+% FRAME,FRAMESET,HEAD,HR,H1,H2,H3,H4,H5,H6,HTML,I,IFRAME,IMG,INPUT,%
+% INS,ISINDEX,KBD,LABEL,LEGEND,LH,LI,LINK,LISTING,MAP,META,MENU,%
+% NOFRAMES,NOSCRIPT,OBJECT,OPTGROUP,OPTION,P,PARAM,PLAINTEXT,PRE,%
+% OL,Q,S,SAMP,SCRIPT,SELECT,SMALL,SPAN,STRIKE,STRING,STRONG,STYLE,%
+% SUB,SUP,TABLE,TBODY,TD,TEXTAREA,TFOOT,TH,THEAD,TITLE,TR,TT,U,UL,%
+% VAR,XMP,%
+% accesskey,action,align,alink,alt,archive,axis,background,bgcolor,%
+% border,cellpadding,cellspacing,charset,checked,cite,class,classid,%
+% code,codebase,codetype,color,cols,colspan,content,coords,data,%
+% datetime,defer,disabled,dir,event,error,for,frameborder,headers,%
+% height,href,hreflang,hspace,http-equiv,id,ismap,label,lang,link,%
+% longdesc,marginwidth,marginheight,maxlength,media,method,multiple,%
+% name,nohref,noresize,noshade,nowrap,onblur,onchange,onclick,%
+% ondblclick,onfocus,onkeydown,onkeypress,onkeyup,onload,onmousedown,%
+% profile,readonly,onmousemove,onmouseout,onmouseover,onmouseup,%
+% onselect,onunload,rel,rev,rows,rowspan,scheme,scope,scrolling,%
+% selected,shape,size,src,standby,style,tabindex,text,title,type,%
+% units,usemap,valign,value,valuetype,vlink,vspace,width,xmlns},%
+% tag=<>,%
+% alsoletter = - ,%
+% sensitive=f,%
+% morestring=[d]",
+% }
+% \end{Verbatim}
%
+%
+%
% \subsection{The language ``minimal''}
%
% \label{minimal}
@@ -6391,9 +6426,17 @@
% With the following \textsc{lpeg}, a style will actually be applied to the
% prompt (for instance, it's possible to decide to discard these prompts).
% \begin{macrocode}
-local Prompt = K ( 'Prompt' , ( ( P ">>>" + "..." ) * P " " ^ -1 ) ) ^ -1
+local Prompt =
+ K ( 'Prompt' , ( ( P ">>>" + "..." ) * P " " ^ -1 + P ( true ) ) ) ^ -1
% \end{macrocode}
-%
+% The |P ( true )| at the end is mandatory because we want the style to be
+% \emph{always} applied, even with an empty argument, in order, for example to
+% add a ``false'' prompt marker with the tuning:
+%
+% \begin{Verbatim}
+% \SetPitonStyle{ Prompt = >>>\space }
+% \end{Verbatim}
+%
%
%
% \bigskip
@@ -8018,7 +8061,7 @@
local TableField =
K ( 'Name.Table' , identifier )
* Q "."
- * K ( 'Name.Field' , identifier )
+ * ( K ( 'Name.Field' , identifier ) ) ^ 0
local OneField =
(
Modified: trunk/Master/texmf-dist/source/lualatex/piton/piton.ins
===================================================================
--- trunk/Master/texmf-dist/source/lualatex/piton/piton.ins 2025-01-18 10:20:22 UTC (rev 73497)
+++ trunk/Master/texmf-dist/source/lualatex/piton/piton.ins 2025-01-18 21:03:09 UTC (rev 73498)
@@ -1,5 +1,5 @@
%%
-%% Copyright (C) 2022-2024 by F. Pantigny
+%% Copyright (C) 2022-2025 by F. Pantigny
%%
%%
%% This file may be distributed and/or modified under the
@@ -17,7 +17,7 @@
\usedir{tex/lualatex/piton}
\preamble
-------------------------------------------
-Copyright (C) 2022-2024 by F. Pantigny
+Copyright (C) 2022-2025 by F. Pantigny
This file may be distributed and/or modified under the
conditions of the LaTeX Project Public License, either
@@ -36,7 +36,7 @@
\def\MetaPrefix{--}
\preamble
---------------------------------------------
-Copyright (C) 2022-2024 by F. Pantigny
+Copyright (C) 2022-2025 by F. Pantigny
This file may be distributed and/or modified under the
conditions of the LaTeX Project Public License, either
Modified: trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua
===================================================================
--- trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua 2025-01-18 10:20:22 UTC (rev 73497)
+++ trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua 2025-01-18 21:03:09 UTC (rev 73498)
@@ -6,7 +6,7 @@
--
-- piton.dtx (with options: `LUA')
-- ---------------------------------------------
--- Copyright (C) 2022-2024 by F. Pantigny
+-- Copyright (C) 2022-2025 by F. Pantigny
--
-- This file may be distributed and/or modified under the
-- conditions of the LaTeX Project Public License, either
@@ -20,7 +20,7 @@
-- -------------------------------------------
--
-- This file is part of the LuaLaTeX package 'piton'.
-piton_version = "4.2a" -- 2024/12/06
+piton_version = "4.2b" -- 2025/01/18
@@ -255,7 +255,8 @@
P "$" * K ( 'Comment.Math' , ( 1 - S "$\r" ) ^ 1 ) * P "$" -- $
local PromptHastyDetection =
( # ( P ">>>" + "..." ) * Lc [[ \__piton_prompt: ]] ) ^ -1
-local Prompt = K ( 'Prompt' , ( ( P ">>>" + "..." ) * P " " ^ -1 ) ) ^ -1
+local Prompt =
+ K ( 'Prompt' , ( ( P ">>>" + "..." ) * P " " ^ -1 + P ( true ) ) ) ^ -1
local EOL =
P "\r"
*
@@ -1124,7 +1125,7 @@
local TableField =
K ( 'Name.Table' , identifier )
* Q "."
- * K ( 'Name.Field' , identifier )
+ * ( K ( 'Name.Field' , identifier ) ) ^ 0
local OneField =
(
Modified: trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty
===================================================================
--- trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty 2025-01-18 10:20:22 UTC (rev 73497)
+++ trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty 2025-01-18 21:03:09 UTC (rev 73498)
@@ -6,7 +6,7 @@
%%
%% piton.dtx (with options: `STY')
%% -------------------------------------------
-%% Copyright (C) 2022-2024 by F. Pantigny
+%% Copyright (C) 2022-2025 by F. Pantigny
%%
%% This file may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either
@@ -19,8 +19,8 @@
%% LaTeX version 2005/12/01 or later.
%% -------------------------------------------
%%
-\def\PitonFileVersion{4.2a}
-\def\PitonFileDate{2024/12/06}
+\def\PitonFileVersion{4.2b}
+\def\PitonFileDate{2025/01/18}
More information about the tex-live-commits
mailing list.