/[emacs]/emacs/lisp/language/devan-util.el
ViewVC logotype

Diff of /emacs/lisp/language/devan-util.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.40 by handa, Tue Feb 11 01:44:00 2003 UTC revision 1.41 by handa, Tue Feb 11 02:32:33 2003 UTC
# Line 53  Line 53 
53    
54  (defconst devanagari-composable-pattern  (defconst devanagari-composable-pattern
55    (concat    (concat
56     "\\([$,15E(B-$,15T6@6A(B][$,15A5B(B]?\\)\\|$,15C(B"     "\\([$,15E(B-$,15T6@6A(B][$,15A5B(B]?\\)\\|[$,15C6D(B]"
57     "\\|\\("     "\\|\\("
58     "\\(?:\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?"     "\\(?:\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?"
59     "[$,15U(B-$,15y68(B-$,16?(B]\\(?:$,16-(B\\|[$,15~(B-$,16-6B6C(B]?[$,15B5A(B]?\\)?"     "[$,15U(B-$,15y68(B-$,16?(B]\\(?:$,16-(B\\|[$,15~(B-$,16-6B6C(B]?[$,15B5A(B]?\\)?"
# Line 410  PATTERN regexp." Line 410  PATTERN regexp."
410      ("$,16-(B" . "$,4""(B")      ("$,16-(B" . "$,4""(B")
411      ("$,16-5p(B" . "$,4"%(B") ;; following "r"      ("$,16-5p(B" . "$,4"%(B") ;; following "r"
412      ;; ("$,160(B" . "$,4 D(B")      ;; ("$,160(B" . "$,4 D(B")
413      ;; ("$,16D(B" . "$,4 J(B")      ("$,16D(B" . "$,4 J(B")
414      ;; ("$,16F(B" . "")      ;; ("$,16F(B" . "")
415      ;; ("$,16G(B" . "")      ;; ("$,16G(B" . "")
416      ;; ("$,16H(B" . "")      ;; ("$,16H(B" . "")

Legend:
Removed from v.1.40  
changed lines
  Added in v.1.41

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26