gen1.m4

m4_changequote(\\,//)m4_dnl
m4_changecom()m4_dnl
m4_divert(-1)m4_dnl

Copyright: 2022, 2023 Octrooicentrum Nederland

Licensed under the EUPL-1.2 or later.
You may obtain a copy of the licence at https://joinup.ec.europa.eu/collection/eupl/eupl-text-eupl-12.

Author: Marco de Beurs


m4_define(\\StripSpace//, \\m4_translit($1,\\ //)//)m4_dnl
m4_define(\\Generate//, \\m4_define(\\GenTemplate//,StripSpace($1))//)m4_dnl
m4_define(\\SetName//, \\m4_define($1,\\m4_shift($@)//)//)m4_dnl
m4_define(\\SetLevel//, \\m4_ifelse(m4_eval($# <= 2), 1, SetLevel_(StripSpace($1), StripSpace($2)) , \\SetLevel_(StripSpace($1), StripSpace($2)) SetLevel($1, m4_shift(m4_shift($@)))//)//)m4_dnl
m4_define(\\SetLevel_//, \\m4_ifelse($2,0, \\//, \\ set $1-yes: $2 m4_define($1_yes,$2)//) m4_ifelse(m4_index($2,\\-//), -1, \\ set $1: $2 m4_define($1_$2,$2)//, \\SetRange($1, m4_translit($2,\\-//,\\,//))//)//)m4_dnl
m4_define(\\SetRange//, \\m4_ifelse(m4_eval($2 > $3), 1, \\//, \\m4_define($1_$2,$2)// \\range set $1: $2  SetRange($1, m4_incr($2), $3)//)//)m4_dnl
m4_define(\\WebIndex//, \\SetLevel(WebInd,1)m4_define(WebIndHead,\\$1//)m4_define(WebIndHY,\\$2//)m4_define(WebIndD,\\$3//)m4_define(WebIndM,\\$4//)m4_define(WebIndY,\\$5//)//)m4_dnl