Permalink
Fetching contributors…
Cannot retrieve contributors at this time
10 lines (8 sloc) 259 Bytes
import commands
# Create path.rtk
status, abs_path = commands.getstatusoutput("pwd")
f = open("path.rkt", "w")
f.write("#lang racket\n")
f.write("(provide (all-defined-out))\n")
f.write("(define srcpath \"" + abs_path + "\")\n")
print "path.rkt is created."