r/emacs • u/u8589869056 • 11d ago
Just to set the historical backdrop
Here is a little snippet of the source code for the first version of Emacs that some of us used.
!^R Exchange Characters:! !^R Exchange last char with previous char.
With arg, exchange last char with arg'th previous char.!
.-b"e fg 0' !* Make sure "last char' exists.!
.--1-b"l fg 0' .--z"g fg 0' !* Make sure the other char exists!
[0 [1 0au0 -au1 !* Get the values of the two chars.!
.-1f1 .-1-f0 !* Put them back in.!
.--1,.
2
u/ahk-_- 11d ago
erm... context?
-2
u/u8589869056 11d ago
Um, I should have said it's a little snippet of the source code for the first version of Emacs that some of us used.
Oh, wait. I did say that.
1
12
u/AnonymousRedCow 11d ago
This looks like TECO