/usr/lib/clisp-2.49/wildcard/wildcard.fas is in clisp-module-wildcard 1:2.49-9ubuntu1.
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 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 | (|SYSTEM|::|VERSION| '(20080430.))
#0Y_ #0Y |CHARSET|::|UTF-8|
#Y(#:|1 8 (DEFPACKAGE "WILDCARD" (:MODERN T) ...)-1-1|
#20Y(00 00 00 00 00 00 00 00 20 01 DA 01 02 64 64 31 F0 3E 19 01)
("WILDCARD") (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|1 8 (DEFPACKAGE "WILDCARD" (:MODERN T) ...)-1-2|
#34Y(00 00 00 00 00 00 00 00 20 01 DA DB 71 DD 38 06 C7 F9 C8 FA 8F 77 08 DE
DB 31 ED DF DB 31 EC 3E 19 01)
("COMMON-LISP" "WILDCARD" #.#'|COMMON-LISP|::|STRING=|
#.#'|COMMON-LISP|::|PACKAGE-NAME| "COMMON-LISP" "CS-COMMON-LISP")
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|1 8 (DEFPACKAGE "WILDCARD" (:MODERN T) ...)-1-3|
#17Y(00 00 00 00 00 00 00 00 20 01 DA DB 31 EC 3E 19 01)
(("CS-COMMON-LISP" "FFI") "WILDCARD")
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|1 8 (DEFPACKAGE "WILDCARD" (:MODERN T) ...)-1-4|
#19Y(00 00 00 00 00 00 00 00 20 01 DA DB 64 2D 03 02 3E 19 01)
(("match" "wildcard-matcher") "WILDCARD" |SYSTEM|::|INTERN-EXPORT|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|1 8 (DEFPACKAGE "WILDCARD" (:MODERN T) ...)-1-5|
#15Y(00 00 00 00 00 00 00 00 20 01 DA 31 D9 19 01) ("WILDCARD")
(|COMMON-LISP|::|T| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|))
#Y(#:|9 9 (IN-PACKAGE "WILDCARD")-2|
#17Y(00 00 00 00 00 00 00 00 20 01 DA 31 F6 0F 01 19 01)
("WILDCARD" |COMMON-LISP|::|*PACKAGE*|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|10 10 (pushnew "WILDCARD" CUSTOM:*SYSTEM-PACKAGE-LIST* ...)-3|
#22Y(00 00 00 00 00 00 00 00 20 01 DA 6B 01 DC 38 02 31 C5 0F 01 19 01)
("WILDCARD" |CUSTOM|::|*SYSTEM-PACKAGE-LIST*|
#.#'|CS-COMMON-LISP|::|string=|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|11 11 (pushnew :WILDCARD *features*)-4|
#21Y(00 00 00 00 00 00 00 00 20 01 DA 6B 01 38 03 31 C5 0F 01 19 01)
(:|WILDCARD| |COMMON-LISP|::|*FEATURES*|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|12 12 (provide "wildcard")-5|
#15Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 19 01)
("wildcard" |COMMON-LISP|::|PROVIDE|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|13 13 (setf (documentation # 'SYSTEM::IMPNOTES) "wildcard")-6|
#21Y(00 00 00 00 00 00 00 00 20 01 DA 71 D9 DB AD DC 2D 03 03 19 02)
("WILDCARD" "wildcard" |SYSTEM|::|IMPNOTES|
#.(|SYSTEM|::|GET-SETF-SYMBOL| '|CLOS|::|DOCUMENTATION|))
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|15 15 (default-foreign-language :STDC)-7|
#36Y(03 00 01 00 00 00 00 00 20 01 DA DB 38 05 72 6B 53 08 63 AF 30 02 C8 0F
04 54 64 67 00 00 00 30 02 55 19 02)
(#.#'|EXT|::|PACKAGE-LOCK| ("FFI")
#.(|SYSTEM|::|GET-SETF-SYMBOL| '|EXT|::|PACKAGE-LOCK|) :|STDC|
|FFI|::|*FOREIGN-LANGUAGE*|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|19 23 (def-call-out fnmatch (:ARGUMENTS # # ...) ...)-9|
#36Y(00 00 00 00 00 00 00 00 20 01 DA DB DC 70 03 63 6B 04 01 02 6E 06 05 93
00 07 E0 2F 07 E0 AD 32 9C CB 19 02)
("fnmatch"
#1=((:|ARGUMENTS| (|WILDCARD|::|pattern| |FFI|::|C-STRING|)
(|CS-COMMON-LISP|::|string| |FFI|::|C-STRING|)
(|WILDCARD|::|flags| |FFI|::|INT|))
(:|RETURN-TYPE| |FFI|::|INT|))
(|FFI|::|DEF-CALL-OUT| |WILDCARD|::|fnmatch| . #1#)
|FFI|::|PARSE-C-FUNCTION| |FFI|::|*FOREIGN-LIBRARY*|
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|fnmatch|
|SYSTEM|::|REMOVE-OLD-DEFINITIONS|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|25 26 (def-c-const FNM_PATHNAME)-10|
#64Y(00 00 00 00 00 00 00 00 20 01 C5 78 C5 5C 78 AC 8F AC 0C AD AE 6F 01 DC
01 04 6E 06 03 32 9C AD AD DE DE 6E 04 05 DE 38 01 8D 66 0D AC DE 71 55
8E 13 06 DE E0 AE 2D 03 07 DE AD 32 9D C9 19 04)
((|WILDCARD|::|MODULE__WILDCARD__CONSTANT_MAP_LONG| 0.) |FFI|::|TO-C-NAME|
#(|FFI|::|C-FUNCTION| |FFI|::|LONG|
#(|FFI|::|INT| 0. #(|FFI|::|C-PTR| |FFI|::|INT|) 17.) 1024.)
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|FNM_PATHNAME|
|FFI|::|C-CONST-VALUE|
(|COMMON-LISP|::|DEFCONSTANT| |WILDCARD|::|FNM_PATHNAME|
(|FFI|::|C-CONST-VALUE| |FFI|::|F-NAME| |FFI|::|C-NUMBER|
'|WILDCARD|::|FNM_PATHNAME| '|WILDCARD|::|FNM_PATHNAME|))
|SYSTEM|::|CONSTANT-WARNING|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|27 27 (def-c-const FNM_FILE_NAME)-11|
#64Y(00 00 00 00 00 00 00 00 20 01 C5 78 C5 5C 78 AC 8F AC 0C AD AE 6F 01 DC
01 04 6E 06 03 32 9C AD AD DE DE 6E 04 05 DE 38 01 8D 66 0D AC DE 71 55
8E 13 06 DE E0 AE 2D 03 07 DE AD 32 9D C9 19 04)
((|WILDCARD|::|MODULE__WILDCARD__CONSTANT_MAP_LONG| 1.) |FFI|::|TO-C-NAME|
#(|FFI|::|C-FUNCTION| |FFI|::|LONG|
#(|FFI|::|INT| 0. #(|FFI|::|C-PTR| |FFI|::|INT|) 17.) 1024.)
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|FNM_FILE_NAME|
|FFI|::|C-CONST-VALUE|
(|COMMON-LISP|::|DEFCONSTANT| |WILDCARD|::|FNM_FILE_NAME|
(|FFI|::|C-CONST-VALUE| |FFI|::|F-NAME| |FFI|::|C-NUMBER|
'|WILDCARD|::|FNM_FILE_NAME| '|WILDCARD|::|FNM_FILE_NAME|))
|SYSTEM|::|CONSTANT-WARNING|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|28 28 (def-c-const FNM_NOESCAPE)-12|
#64Y(00 00 00 00 00 00 00 00 20 01 C5 78 C5 5C 78 AC 8F AC 0C AD AE 6F 01 DC
01 04 6E 06 03 32 9C AD AD DE DE 6E 04 05 DE 38 01 8D 66 0D AC DE 71 55
8E 13 06 DE E0 AE 2D 03 07 DE AD 32 9D C9 19 04)
((|WILDCARD|::|MODULE__WILDCARD__CONSTANT_MAP_LONG| 2.) |FFI|::|TO-C-NAME|
#(|FFI|::|C-FUNCTION| |FFI|::|LONG|
#(|FFI|::|INT| 0. #(|FFI|::|C-PTR| |FFI|::|INT|) 17.) 1024.)
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|FNM_NOESCAPE|
|FFI|::|C-CONST-VALUE|
(|COMMON-LISP|::|DEFCONSTANT| |WILDCARD|::|FNM_NOESCAPE|
(|FFI|::|C-CONST-VALUE| |FFI|::|F-NAME| |FFI|::|C-NUMBER|
'|WILDCARD|::|FNM_NOESCAPE| '|WILDCARD|::|FNM_NOESCAPE|))
|SYSTEM|::|CONSTANT-WARNING|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|29 29 (def-c-const FNM_PERIOD)-13|
#64Y(00 00 00 00 00 00 00 00 20 01 C5 78 C5 5C 78 AC 8F AC 0C AD AE 6F 01 DC
01 04 6E 06 03 32 9C AD AD DE DE 6E 04 05 DE 38 01 8D 66 0D AC DE 71 55
8E 13 06 DE E0 AE 2D 03 07 DE AD 32 9D C9 19 04)
((|WILDCARD|::|MODULE__WILDCARD__CONSTANT_MAP_LONG| 3.) |FFI|::|TO-C-NAME|
#(|FFI|::|C-FUNCTION| |FFI|::|LONG|
#(|FFI|::|INT| 0. #(|FFI|::|C-PTR| |FFI|::|INT|) 17.) 1024.)
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|FNM_PERIOD|
|FFI|::|C-CONST-VALUE|
(|COMMON-LISP|::|DEFCONSTANT| |WILDCARD|::|FNM_PERIOD|
(|FFI|::|C-CONST-VALUE| |FFI|::|F-NAME| |FFI|::|C-NUMBER|
'|WILDCARD|::|FNM_PERIOD| '|WILDCARD|::|FNM_PERIOD|))
|SYSTEM|::|CONSTANT-WARNING|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|30 30 (def-c-const FNM_LEADING_DIR)-14|
#64Y(00 00 00 00 00 00 00 00 20 01 C5 78 C5 5C 78 AC 8F AC 0C AD AE 6F 01 DC
01 04 6E 06 03 32 9C AD AD DE DE 6E 04 05 DE 38 01 8D 66 0D AC DE 71 55
8E 13 06 DE E0 AE 2D 03 07 DE AD 32 9D C9 19 04)
((|WILDCARD|::|MODULE__WILDCARD__CONSTANT_MAP_LONG| 4.) |FFI|::|TO-C-NAME|
#(|FFI|::|C-FUNCTION| |FFI|::|LONG|
#(|FFI|::|INT| 0. #(|FFI|::|C-PTR| |FFI|::|INT|) 17.) 1024.)
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|FNM_LEADING_DIR|
|FFI|::|C-CONST-VALUE|
(|COMMON-LISP|::|DEFCONSTANT| |WILDCARD|::|FNM_LEADING_DIR|
(|FFI|::|C-CONST-VALUE| |FFI|::|F-NAME| |FFI|::|C-NUMBER|
'|WILDCARD|::|FNM_LEADING_DIR| '|WILDCARD|::|FNM_LEADING_DIR|))
|SYSTEM|::|CONSTANT-WARNING|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|31 31 (def-c-const FNM_CASEFOLD)-15|
#64Y(00 00 00 00 00 00 00 00 20 01 C5 78 C5 5C 78 AC 8F AC 0C AD AE 6F 01 DC
01 04 6E 06 03 32 9C AD AD DE DE 6E 04 05 DE 38 01 8D 66 0D AC DE 71 55
8E 13 06 DE E0 AE 2D 03 07 DE AD 32 9D C9 19 04)
((|WILDCARD|::|MODULE__WILDCARD__CONSTANT_MAP_LONG| 5.) |FFI|::|TO-C-NAME|
#(|FFI|::|C-FUNCTION| |FFI|::|LONG|
#(|FFI|::|INT| 0. #(|FFI|::|C-PTR| |FFI|::|INT|) 17.) 1024.)
|FFI|::|FIND-FOREIGN-FUNCTION| |WILDCARD|::|FNM_CASEFOLD|
|FFI|::|C-CONST-VALUE|
(|COMMON-LISP|::|DEFCONSTANT| |WILDCARD|::|FNM_CASEFOLD|
(|FFI|::|C-CONST-VALUE| |FFI|::|F-NAME| |FFI|::|C-NUMBER|
'|WILDCARD|::|FNM_CASEFOLD| '|WILDCARD|::|FNM_CASEFOLD|))
|SYSTEM|::|CONSTANT-WARNING|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|33 43 (defun match (pattern string &key ...) ...)-16|
#20Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 DA DC 32 9C C5 19 01)
(|WILDCARD|::|match| |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
#Y(|WILDCARD|::|match|
#74Y(00 00 00 00 02 00 00 00 A6 1D 03 00 00 00 3B 03 02 C8 FB 3D 02 3D
01 AF 25 03 03 93 02 15 92 02 04 B0 81 62 02 AE B0 73 01 38 38 05
C9 FB B6 B6 80 1D 04 B1 B1 6B 05 92 04 0C C8 14 73 02 3E 6E 03 07
32 AC 19 06 0E 06 1B 71)
(:|START| :|END| :|CASE-INSENSITIVE| 0. |COMMON-LISP|::|CHARACTER|
|WILDCARD|::|FNM_PATHNAME| |WILDCARD|::|FNM_CASEFOLD|
|WILDCARD|::|fnmatch|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
(|WILDCARD|::|pattern| |CS-COMMON-LISP|::|string| |COMMON-LISP|::|&KEY|
(|WILDCARD|::|start| 0.) (|WILDCARD|::|end| |COMMON-LISP|::|NIL|)
(|WILDCARD|::|case-insensitive| |COMMON-LISP|::|NIL|))
|COMMON-LISP|::|NIL| 1))
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|45 47 (defun wildcard-matcher (pattern) ...)-17|
#20Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 DA DC 32 9C C5 19 01)
(|WILDCARD|::|wildcard-matcher| |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
#Y(|WILDCARD|::|wildcard-matcher|
#23Y(00 00 00 00 01 00 00 00 26 02 00 2B 01 7F 02 00 00 AC 2C 00 01 19
03)
(#Y(|WILDCARD|::|wildcard-matcher-1|
#23Y(00 00 00 00 01 00 00 00 26 02 69 00 01 AE 6B 01 6E 03 02 32 AC
19 02)
(|COMMON-LISP|::|NIL| |WILDCARD|::|FNM_CASEFOLD|
|WILDCARD|::|fnmatch|)
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
(|WILDCARD|::|name|) |COMMON-LISP|::|NIL| 1))
(|COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|)
(|WILDCARD|::|pattern|) "A valid value for *APROPOS-MATCHER*." 1))
(|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
|