Parent Directory | Revision Log | Patch
revision 1.2 by ossau, Tue Jan 22 23:46:01 2002 UTC | revision 1.3 by ossau, Fri Feb 8 11:50:51 2002 UTC | |
---|---|---|
# | Line 45 | Line 45 |
45 | (iota (match:count match)))) | (iota (match:count match)))) |
46 | #f))) | #f))) |
47 | ||
48 | (if last-match (car last-match) #f))) | (if last-match (car last-match) %nil))) |
49 | ||
50 | (fset 'match-beginning | (fset 'match-beginning |
51 | (lambda (subexp) | (lambda (subexp) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |