File: self.tf

package info (click to toggle)
tf5 5.0beta8-7
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 3,800 kB
  • sloc: ansic: 25,492; perl: 103; makefile: 82; sh: 79
file content (6 lines) | stat: -rw-r--r-- 314 bytes parent folder | download | duplicates (17) 
1
2
3
4
5
6
 
;;; Macro that prints its own body (without using ${self} or $(/list self)).
;;; "/eval /def self = $(/self)" will make /self redefine itself.
;;; Not useful, just interesting.

/def self=/let q="%;/let p=%% %;/let f=strcat("/let q=",q,p,";/let p=",p,p," ",p,";/let f=",f,p,";/test echo(",p,"f)")%;/test echo(%f)