PasteRack.org
Paste #
63432
2017-03-01 00:13:46
Forked from paste #
41664
.
Fork
as a new paste.
Paste viewed 327 times.
Tweet
Embed:
<link type="text/css" rel="stylesheet" href="http://pasterack.org/scribble.css"/><link type="text/css" rel="stylesheet" href="http://pasterack.org/racket.css"/><link type="text/css" rel="stylesheet" href="http://fonts.googleapis.com/css?family=Droid+Sans+Mono"/><div style="font-family:'Droid Sans Mono',monospace;background-color:transparent"><ol start="0" style="font-size:70%;color:#A0A0A0"><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><a class="RktModLink" data-pltdoc="x" href="http://docs.racket-lang.org/guide/Module_Syntax.html#%28part._hash-lang%29"><span class="RktMod">#lang</span></a><span class="RktMeta"></span><span class="hspace"> </span><span class="RktMeta"></span><a class="RktModLink" data-pltdoc="x" href="http://docs.racket-lang.org/scribble/manual.html"><span class="RktSym">scribble/manual</span></a><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta"> </span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym"><a class="RktStxLink" data-pltdoc="x" href="http://docs.racket-lang.org/reference/require.html#%28form._%28%28lib._racket%2Fprivate%2Fbase..rkt%29._require%29%29">require</a></span><span class="RktPn">[</span><span class="RktSym">racket/runtime-path</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta"> </span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta">;</span><span class="hspace"> </span><span class="RktMeta">how</span><span class="hspace"> </span><span class="RktMeta">do</span><span class="hspace"> </span><span class="RktMeta">i</span><span class="hspace"> </span><span class="RktMeta">take</span><span class="hspace"> </span><span class="RktMeta">lines</span><span class="hspace"> </span><span class="RktMeta">like</span><span class="hspace"> </span><span class="RktMeta">this:</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym"><a class="RktStxLink" data-pltdoc="x" href="http://docs.racket-lang.org/reference/Filesystem.html#%28form._%28%28lib._racket%2Fruntime-path..rkt%29._define-runtime-path%29%29">define-runtime-path</a></span><span class="RktPn">[</span><span class="RktSym">square-1.png</span><span class="RktMeta"></span><span class="hspace"> </span><span class="RktMeta"></span><span class="RktVal">"square-1.png"</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym"><a class="RktStxLink" data-pltdoc="x" href="http://docs.racket-lang.org/reference/Filesystem.html#%28form._%28%28lib._racket%2Fruntime-path..rkt%29._define-runtime-path%29%29">define-runtime-path</a></span><span class="RktPn">[</span><span class="RktSym">square-2.png</span><span class="RktMeta"></span><span class="hspace"> </span><span class="RktMeta"></span><span class="RktVal">"square-2.png"</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym"><a class="RktStxLink" data-pltdoc="x" href="http://docs.racket-lang.org/reference/Filesystem.html#%28form._%28%28lib._racket%2Fruntime-path..rkt%29._define-runtime-path%29%29">define-runtime-path</a></span><span class="RktPn">[</span><span class="RktSym">square-1-3.png</span><span class="RktMeta"></span><span class="hspace"> </span><span class="RktMeta"></span><span class="RktVal">"square-1-3.png"</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym"><a class="RktStxLink" data-pltdoc="x" href="http://docs.racket-lang.org/reference/Filesystem.html#%28form._%28%28lib._racket%2Fruntime-path..rkt%29._define-runtime-path%29%29">define-runtime-path</a></span><span class="RktPn">[</span><span class="RktSym">square-2-1.png</span><span class="RktMeta"></span><span class="hspace"> </span><span class="RktMeta"></span><span class="RktVal">"square-2-1.png"</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym"><a class="RktStxLink" data-pltdoc="x" href="http://docs.racket-lang.org/reference/Filesystem.html#%28form._%28%28lib._racket%2Fruntime-path..rkt%29._define-runtime-path%29%29">define-runtime-path</a></span><span class="RktPn">[</span><span class="RktSym">square-3-1.png</span><span class="RktMeta"></span><span class="hspace"> </span><span class="RktMeta"></span><span class="RktVal">"square-3-1.png"</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta"> </span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta">;</span><span class="hspace"> </span><span class="RktMeta">and</span><span class="hspace"> </span><span class="RktMeta">make</span><span class="hspace"> </span><span class="RktMeta">it</span><span class="hspace"> </span><span class="RktMeta">so</span><span class="hspace"> </span><span class="RktMeta">i</span><span class="hspace"> </span><span class="RktMeta">can</span><span class="hspace"> </span><span class="RktMeta">write</span><span class="hspace"> </span><span class="RktMeta">lines</span><span class="hspace"> </span><span class="RktMeta">like</span><span class="hspace"> </span><span class="RktMeta">this</span><span class="hspace"> </span><span class="RktMeta">instead:</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktPn">@</span><span class="RktSym">define-runtime-path-q</span><span class="RktPn">[</span><span class="RktSym">square-1.png</span><span class="RktPn">]</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta">;</span><span class="hspace"> </span><span class="RktMeta">?</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta"> </span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta">;</span><span class="hspace"> </span><span class="RktMeta">i'm</span><span class="hspace"> </span><span class="RktMeta">guessing</span><span class="hspace"> </span><span class="RktMeta">this</span><span class="hspace"> </span><span class="RktMeta">is</span><span class="hspace"> </span><span class="RktMeta">something</span><span class="hspace"> </span><span class="RktMeta">that</span><span class="hspace"> </span><span class="RktMeta">can</span><span class="hspace"> </span><span class="RktMeta">be</span><span class="hspace"> </span><span class="RktMeta">done</span><span class="hspace"> </span><span class="RktMeta">with</span><span class="hspace"> </span><span class="RktMeta">macros,</span><span class="RktMeta"></span></span></li><li><span style="font-family:'Droid Sans Mono',monospace;font-size:125%"><span class="RktMeta"></span><span class="RktMeta">;</span><span class="hspace"> </span><span class="RktMeta">but</span><span class="hspace"> </span><span class="RktMeta">i</span><span class="hspace"> </span><span class="RktMeta">don't</span><span class="hspace"> </span><span class="RktMeta">know</span><span class="hspace"> </span><span class="RktMeta">where</span><span class="hspace"> </span><span class="RktMeta">to</span><span class="hspace"> </span><span class="RktMeta">start</span><span class="RktMeta"></span></span></li></ol><p>=></p><div><pre></pre></div></div>
define-runtime-path-a-lot-maybe-macros
#lang
scribble/manual
@
require
[
racket/runtime-path
]
;
how
do
i
take
lines
like
this:
@
define-runtime-path
[
square-1.png
"square-1.png"
]
@
define-runtime-path
[
square-2.png
"square-2.png"
]
@
define-runtime-path
[
square-1-3.png
"square-1-3.png"
]
@
define-runtime-path
[
square-2-1.png
"square-2-1.png"
]
@
define-runtime-path
[
square-3-1.png
"square-3-1.png"
]
;
and
make
it
so
i
can
write
lines
like
this
instead:
@
define-runtime-path-q
[
square-1.png
]
;
?
;
i'm
guessing
this
is
something
that
can
be
done
with
macros,
;
but
i
don't
know
where
to
start
=>