4e68c5a ^
1 2 3 4 5 6 7 8 9 10 11
(defpackage :cconv (:use :common-lisp :ltk) (:export #:main)) (in-package :cconv) (defun main () (setf *debug-tk* nil) (with-ltk () (wm-title "." "Feet to Meters") ()))