fukamachi

#|-*- mode:lisp -*-|#
#|
exec ros -Q -- $0 "$@"
|#

#|
Generate a Hubot script (.js file) from the given Roswell script.

Usage:
  $ hubotify <roswell script>

fukamachi

require "formula"

class Chasen < Formula
  homepage "http://chasen-legacy.osdn.jp"
  url "http://iij.dl.osdn.jp/chasen-legacy/56305/chasen-2.4.5.tar.gz"
  sha256 "fd1a7afd73ed14e18b0fe82965c00a6baae383070360a4220fde01338611416a"

  head "git://git.osdn.jp/gitroot/chasen-legacy/chasen.git"

  def install

fukamachi

Common Lisp Scripting with Roswell

"Roswell Script" is implementation-independent Common Lisp scripting program which uses Roswell. Although Roswell itself is a unified interface to Common Lisp implementations, it also encourages writing scripts with it.

To start writing it, run ros init in your terminal:

$ ros init
Usage: ros init [template] name [options...]

fukamachi

Using Travis CI with Roswell

Travis CI is the most prevalent cloud CI service. Though it has no Common Lisp support officially, by using Roswell, you can test your Common Lisp product with a few efforts.

WARNING: This document is based on Roswell v0.0.3.42 (not released yet) or above.

Enabling Travis CI

To use Travis CI, you must sign up and enable testing for your repository at your profile page.

fukamachi

Quicklisp badge

Quickdocs.org now provides project badges for Quicklisp projects. It shows Quicklisp dist version when the project was updated last.

Once the project owner adds this badge to their README file, it will inform the project is ready for Quicklisp and its documentation is available on Quickdocs.org.

Stability

It's available, however it was just added in this morning at whim and it may still have issues. Please try it and tell @nitro_idiot if you encountered any issues.

fukamachi

(defun which (command)
  (handler-case
      (let* ((result (with-output-to-string (s)
                       (uiop:run-program `("which" ,command)
                                         :output s
                                         :error-output *error-output*)))
             (newline-pos
               (position-if (lambda (char)
                              (or (char= char #\Newline)
                                  (char= char #\Return)))

fukamachi

#!/bin/sh
#|-*- mode:lisp -*-|#
#|
exec ros -Q -- $0 "$@"
|#

#|

A Roswell script to open the HyperSpec page of a specified symbol in the default browser.

fukamachi

$ ros starter.ros 
While evaluating the form starting at line 127, column 0
  of #P"/usr/local/share/common-lisp/source/roswell/init.lisp":
Unhandled SB-INT:C-STRING-DECODING-ERROR in thread #<SB-THREAD:THREAD
                                                     "main thread" RUNNING
                                                      {1002D77563}>:
  :UTF-8 c-string decoding error:
    the octet sequence #(200 23) cannot be decoded.

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1002D77563}>

fukamachi

FROM ubuntu
MAINTAINER Eitaro Fukamachi <e.arrows@gmail.com>

LABEL Description="Ubuntu with Roswell, Common Lisp implementation manager"

RUN apt-get update && apt-get install -y autotools-dev automake libcurl4-gnutls-dev curl make
RUN curl -SL https://github.com/snmsts/roswell/archive/release.tar.gz \
  | tar -xzC /tmp/ \
  && cd /tmp/roswell-release \
  && sh bootstrap \

fukamachi

(ql:quickload :alexandria)
(import '(alexandria:ensure-cons alexandria:once-only))

(defmacro vector-case (vec-and-options &body cases)
  (destructuring-bind (vec &key (start 0) end case-insensitive)
      (ensure-cons vec-and-options)
    (let ((otherwise (gensym "otherwise")))
      (labels ((case-candidates (el)
                 (if (and case-insensitive
                          (characterp el))