module/slib/selfset.scm

   1 ;;"selfset.scm" Set single letter identifiers to their symbols.
   2
   3  (define a 'a)
   4  (define b 'b)
   5  (define c 'c)
   6  (define d 'd)
   7  (define e 'e)
   8  (define f 'f)
   9  (define g 'g)
  10  (define h 'h)
  11  (define i 'i)
  12  (define j 'j)
  13  (define k 'k)
  14  (define l 'l)
  15  (define m 'm)
  16  (define n 'n)
  17  (define o 'o)
  18  (define p 'p)
  19  (define q 'q)
  20  (define r 'r)
  21  (define s 's)
  22  (define t 't)
  23  (define u 'u)
  24  (define v 'v)
  25  (define w 'w)
  26  (define x 'x)
  27  (define y 'y)
  28  (define z 'z)