changelog shortlog graph tags branches changeset files file revisions raw help

Mercurial > demo / annotate demo.ros

changeset 13: 1fedeaa5bfc5
author: ellis <ellis@rwest.io>
date: Fri, 19 May 2023 22:38:49 -0400
permissions: -rwxr-xr-x
description: tweaks to ffi and makefile
13
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
1
 #!/bin/sh
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
2
 #|-*- mode:lisp -*-|#
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
3
 #|
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
4
 exec ros -Q -- $0 "$@"
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
5
 |#
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
6
 (progn ;;init forms
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
7
   (ros:ensure-asdf)
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
8
   #+quicklisp(ql:quickload '(demo) :silent t))
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
9
 
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
10
 (defun main (&rest argv)
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
11
   (declare (ignorable argv))
1fedeaa5bfc5 tweaks to ffi and makefile
ellis <ellis@rwest.io>
parents:
diff changeset
12
   (demo:main))