gauche script の linux と windows

• Gauche ユーザリファレンス: 3.3 Schemeスクリプトを書く
• Schemeスクリプトを書く - karetta.jp

linux とかだと、例えば glp.scm という名前で

#! /usr/local/bin/gosh

(use gauche.parseopt)

(define (main args)
  (let-args (cdr args)
      ((ls "l|list")
       . rest)
    (if ls
        (for-each print *load-path*)
        (print *load-path*))
    0))

$ glp
(/usr/local/share/gauche-0.9/site/lib /usr/local/share/gauche-0.9/0.9.1/lib /usr/local/share/gauche/site/lib /usr/local/share/gauche/0.9/lib)
$ glp -l
/usr/local/share/gauche-0.9/site/lib
/usr/local/share/gauche-0.9/0.9.1/lib
/usr/local/share/gauche/site/lib
/usr/local/share/gauche/0.9/lib

で、windows だとこんな感じでできるみたい。

• Gauche:scm2cmd

;; @rem -*- mode: scheme -*-
;; @echo off
;; gosh "%~f0" %*
;; goto :__gauche_script_end

(use gauche.parseopt)

(define (main args)
  (let-args (cdr args)
      ((ls "l|list")
       . rest)
    (if ls
        (for-each print *load-path*)
        (print *load-path*))
    0))

;;
;; :__gauche_script_end
;;

C:\>glp.scm.cmd
(C:\Gauche\share\gauche-0.9\site\lib C:\Gauche\share\gauche-0.9\0.9.1\lib C:\Gauche\share\gauche/site/lib C:\Gauche\share\gauche/0.9/lib)
C:\>glp.scm.cmd -l
C:\Gauche\share\gauche-0.9\site\lib
C:\Gauche\share\gauche-0.9\0.9.1\lib
C:\Gauche\share\gauche/site/lib
C:\Gauche\share\gauche/0.9/lib

検索したらこんなものが。。

• Gaucheでシェルスクリプト的な何かを書くための、キモいツール書いた - 日記を書く [・w・] はやみずさん
• Gaucheでシェルスクリプトとかいうアレは - 日記を書く [・w・] はやみずさん
• Gaucheでシェルスクリプト - athosの日記

追記

さっそく教えて頂きました！

• Twitter / SaitoAtsushi: @valvallow Windows だと拡張子 . ...

@valvallow Windows だと拡張子 .scm を gosh に関連付けしておけばコマンドラインからファイル名を入力するだけでOKです。 更に環境変数 PATHEXT に拡張子を定義しておけばその拡張子を省略した名前がコマンド名として使えるようになります。

• Twitter / SaitoAtsushi: @valvallow 参考記事。 http://go ...

@valvallow 参考記事。 http://goo.gl/UidLd この記事ではコマンドで設定しています。 エクスプローラから関連付けするとコマンドライン引数がうまく渡されなくなってしまうことがあるようです。