9 lines
148 B
Plaintext
9 lines
148 B
Plaintext
|
#!@GUILE@ --no-auto-compile
|
||
|
-*- scheme -*-
|
||
|
!#
|
||
|
|
||
|
(use-modules (gib-gab-gob rps))
|
||
|
(apply join-rps (cdr (command-line)))
|
||
|
|
||
|
(while #t #f) ;; indefinitely
|