File: self.tf

package info (click to toggle)
tf5 5.0beta8-3
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 3,372 kB
  • ctags: 2,663
  • sloc: ansic: 25,492; makefile: 131; perl: 103; 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)