- LISP - CLOS
- LISP - Error Handling
- LISP - Packages
- LISP - Structures
- LISP - File I/O
- LISP - Input & Output
- LISP - Hash Table
- LISP - Tree
- LISP - Set
- LISP - Vectors
- LISP - Symbols
- LISP - Lists
- LISP - Sequences
- LISP - Strings
- LISP - Arrays
- LISP - Characters
- LISP - Numbers
- LISP - Predicates
- LISP - Functions
- LISP - Loops
- LISP - Decisions
- LISP - Operators
- LISP - Constants
- LISP - Variables
- LISP - Macros
- LISP - Data Types
- LISP - Basic Syntax
- LISP - Program Structure
- LISP - Environment
- LISP - Overview
- LISP - Home
LISP Useful Resources
Selected Reading
- Who is Who
- Computer Glossary
- HR Interview Questions
- Effective Resume Writing
- Questions and Answers
- UPSC IAS Exams Notes
LISP - Characters
In LISP, characters are represented as data objects of type character.
You can denote a character object preceding # before the character itself. For example, #a means the character a.
Space and other special characters can be denoted by preceding # before the name of the character. For example, #SPACE represents the space character.
The following example demonstrates this −
Example
Create a new source code file named main.psp and type the following code in it.
(write a) (terpri) (write #a) (terpri) (write-char #a) (terpri) (write-char a)
When you execute the code, it returns the following result −
A #a a *** - WRITE-CHAR: argument A is not a character
Special Characters
Common LISP allows using the following special characters in your code. They are called the semi-standard characters.
#Backspace
#Tab
#Linefeed
#Page
#Return
#Rubout
Character Comparison Functions
Numeric comparison functions and operators, pke, < and > do not work on characters. Common LISP provides other two sets of functions for comparing characters in your code.
One set is case-sensitive and the other case-insensitive.
The following table provides the functions −
Case Sensitive Functions | Case-insensitive Functions | Description |
---|---|---|
char= | char-equal | Checks if the values of the operands are all equal or not, if yes then condition becomes true. |
char/= | char-not-equal | Checks if the values of the operands are all different or not, if values are not equal then condition becomes true. |
char< | char-lessp | Checks if the values of the operands are monotonically decreasing. |
char> | char-greaterp | Checks if the values of the operands are monotonically increasing. |
char<= | char-not-greaterp | Checks if the value of any left operand is greater than or equal to the value of next right operand, if yes then condition becomes true. |
char>= | char-not-lessp | Checks if the value of any left operand is less than or equal to the value of its right operand, if yes then condition becomes true. |
Example
Create a new source code file named main.psp and type the following code in it.
; case-sensitive comparison (write (char= #a #)) (terpri) (write (char= #a #a)) (terpri) (write (char= #a #A)) (terpri) ;case-insensitive comparision (write (char-equal #a #A)) (terpri) (write (char-equal #a #)) (terpri) (write (char-lessp #a # #c)) (terpri) (write (char-greaterp #a # #c))
When you execute the code, it returns the following result −
NIL T NIL T NIL T NILAdvertisements