/usr/share/codeblocks/lexers/lexer_lisp.sample is in codeblocks-common 10.05-2.1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 | ;;; This function, given a specific degree in Farhrenheit,
;;; presents the user with equivalent Celsius degree.
(defun convert ()
(format t "Enter Fahrenheit ")
(LET (fahr)
(SETQ fahr (read fahr))
(APPEND '(celsisus is) (*(- fahr 32)(/ 5 9)) )
)
)
|