mirror of
https://github.com/hymkor/lispect.git
synced 2026-08-27 20:36:34 -04:00
example.lsp: ARGV to *argv*
This commit is contained in:
+1
-1
@@ -1,5 +1,5 @@
|
||||
(catch 'fail
|
||||
(if (< (length ARGV) 2)
|
||||
(if (< (length *argv*) 2)
|
||||
(progn
|
||||
(format (error-output) "Usage: ~A ~A USERNAME@DOMAIN PASSWORD~%" *executable-name* *program-name*)
|
||||
(throw 'fail nil)))
|
||||
|
||||
Reference in New Issue
Block a user