diff --git a/compile-r7rs.scm b/compile-r7rs.scm
index 65bf66c..4bd66e3 100644
--- a/compile-r7rs.scm
+++ b/compile-r7rs.scm
@@ -165,12 +165,10 @@
              ((symbol=? compilation-target 'windows) "")
              ((symbol=? compilation-target 'php) "")
              (else "exec"))
-           ;; How to get the script file
            (cond
              ((symbol=? compilation-target 'windows) "%0%")
              ((symbol=? compilation-target 'php) "$binname")
              (else "\"$0\""))
-             ;(else "$(cd -- \"$(dirname \"$0\")\" >/dev/null 2>&1 && pwd -P)/\"$0\""))
            (cond
              ((symbol=? compilation-target 'windows) "")
              ((symbol=? compilation-target 'php) "")