MiscMirror/lispect
1
0
Fork 0
mirror of https://github.com/hymkor/lispect.git synced 2026-09-05 08:37:49 -04:00
Code Issues Packages Projects Releases Wiki Activity

example.lsp: ARGV to *argv*

Browse Source
This commit is contained in:
HAYAMA Kaoru
2025-08-12 02:39:59 +09:00
parent 4adfb750eb
commit 0780095a3f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
example.lsp
+1 -1
View File
@@ -1,5 +1,5 @@
(catch 'fail (catch 'fail
(if (< (length ARGV) 2) (if (< (length *argv*) 2)
(progn (progn
(format (error-output) "Usage: ~A ~A USERNAME@DOMAIN PASSWORD~%" *executable-name* *program-name*) (format (error-output) "Usage: ~A ~A USERNAME@DOMAIN PASSWORD~%" *executable-name* *program-name*)
(throw 'fail nil))) (throw 'fail nil)))