From: Martin Mares <mj@ucw.cz>
Date: Fri, 22 Jun 2018 09:23:20 +0000 (+0200)
Subject: Added \sdef and \slet (inspired by OPmac)
X-Git-Tag: v1.99~1^2~11
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=107aecaf98b1c4e3cea02295ffaf7d2479fe991b;p=ucwmac.git

Added \sdef and \slet (inspired by OPmac)
---

diff --git a/ucwmac.tex b/ucwmac.tex
index d4b4e3d..ea292d7 100644
--- a/ucwmac.tex
+++ b/ucwmac.tex
@@ -35,6 +35,10 @@
 \long\def\prependef#1#2{\expandafter\def\expandafter#1\expandafter{#2#1}}
 \long\def\appendef#1#2{\expandafter\def\expandafter#1\expandafter{#1#2}}
 
+% Variants of \def and \let, where the control sequence name is given as a string
+\def\sdef#1{\expandafter\def\csname#1\endcsname}
+\def\slet#1#2{\expandafter\let\csname#1\expandafter\endcsname\csname#2\endcsname}
+
 \def\ucwwarn#1{\immediate\write16{*** Warning: #1 ***}}
 
 %%% Page size and margins %%%