- (let* (status
- (ada-name (file-name-sans-extension (file-name-nondirectory file-name)))
- (predefined (cdr (assoc ada-name ada-gnat-predefined-package-alist))))
+ (let* ((ada-name (file-name-sans-extension (file-name-nondirectory file-name)))
+ (predefined (cdr (assoc ada-name ada-gnat-predefined-package-alist))))