Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.

Lisp File Lock

Pihu_2024
Contributor

Lisp File Lock

Pihu_2024
Contributor
Contributor

Dear Sir,

 

I want to lisp file locking prgramming.

any body please help me.

 

0 Likes
Reply
2,396 Views
40 Replies
Replies (40)

Sea-Haven
Mentor
Mentor

I did post the code needed, just did not wrap it.

 

 

(setq expire 20250000)
(if (> (fix (getvar 'cdate)) expire)
(progn (Alert "Oops ran out of time ")(exit))
)
0 Likes