Commit f52dbb38 authored by Gérard Huet's avatar Gérard Huet

Cleanups

parent 46bfe9f3
......@@ -660,8 +660,14 @@ value avocalic = fun
| [] -> failwith "Nouns.avocalic: empty stem"
]
;
(* NB impossible to factorise with [build_van] because "mne" and not "nne" *)
value build_man g stem entry =
let avoc = avocalic stem in
let vedic_drop = match entry with (* Whitney§425e *)
[ "mahiman" | "prathiman" | "variman" | "daaman" | "preman" | "bhuuman"
-> True
| _ -> False
]
and avoc = avocalic stem in
let decline case suff = (case,fix stem suff) in
enter entry (
[ Declined Noun g
......@@ -675,6 +681,7 @@ value build_man g stem entry =
; decline Gen (if avoc then "manas" else "mnas")
; decline Loc "mani"
] @ (if g=Neu then [ decline Voc "ma" ] else [])
@ (if vedic_drop then [ decline Ins "naa" ] else [])
@ (if avoc then [] else [ decline Loc "mni" ]))
; (Dual, (if g=Neu then
[ decline Voc "manii"
......
......@@ -8,4 +8,4 @@
(**************************************************************************)
(* Generated by make version - see main Makefile *)
value version="3.10" and version_date="2018-11-27";
value version="3.11" and version_date="2018-12-20";
......@@ -25,7 +25,7 @@ value truncation = 10000
;
(* threshold for printing the list of explicit segmentation solutions *)
value max_count = 100 (* do not exceed - use rather the graphical interface *)
value max_count = 100 (* do not exceed - rather use the graphical interface *)
;
value cache_allowed = target=Station (* cache allowed only on Station *)
;
......@@ -50,10 +50,10 @@ and reader_cgi = cgi_bin Paths.cgi_reader (* reader *)
and parser_cgi = cgi_bin Paths.cgi_parser (* parser *)
and graph_cgi = cgi_bin Paths.cgi_graph (* summarizer graphical interface *)
and user_aid_cgi = cgi_bin Paths.cgi_user_aid (* unknown chunks processing *)
and sandhier_cgi = cgi_bin Paths.cgi_sandhier (* sandhier *)
and sandhier_cgi = cgi_bin Paths.cgi_sandhier (* sandhier *)
and corpus_manager_cgi = cgi_bin Paths.cgi_corpus_manager (* Corpus manager *)
and save_corpus_cgi = cgi_bin Paths.cgi_save_corpus
and mkdir_corpus_cgi = cgi_bin Paths.cgi_mkdir_corpus
and save_corpus_cgi = cgi_bin Paths.cgi_save_corpus
and mkdir_corpus_cgi = cgi_bin Paths.cgi_mkdir_corpus
;
(* Absolute paths on development site *)
value resources name = Paths.skt_resources_dir ^ name ^ "/"
......@@ -341,9 +341,7 @@ value dico_title = fun
]
;
(* We set and reset [output_channel] to designate either a static html file
under creation or [stdout] to produce a cgi output dynamic page.
This is awful and should be fixed one day.
*)
under creation or [stdout] to produce a cgi output dynamic page. Ugly. *)
value output_channel = ref stdout
;
value ps s = output_string output_channel.val s
......
VERSION='3.11'
DATE='2018-12-04'
DATE='2018-12-20'
No preview for this file type
This source diff could not be displayed because it is too large. You can view the blob instead.
......@@ -244,11 +244,11 @@ University, Ramtek, Nagpur, Maharashtra</a>
<a href="http://www.sansknet.org/">Sansknet, Rashtriya Sanskrit Vidyapeetha, Tirupati</a><br>
<a href="http://rsvidyapeetha.ac.in/">Rashtriya Sanskrit Vidyapeetha, Tirupati</a><br>
<!-- obsolete <a href="http://www.jnu.ac.in/Academics/SpecialCentres/Sanskrit/index.html">Center for Sanskrit Studies, J.N.U., New Delhi</a><br> -->
<a href="http://sanskrit.jnu.ac.in/index.jsp">Special Center for Sanskrit Studies, Jawaharal Nehru University, New Delhi</a><br>
<a href="http://sanskrit.jnu.ac.in/index.jsp">School of Sanskrit and Indic Studies, Jawaharal Nehru University, New Delhi</a><br>
<a href="http://www.cfilt.iitb.ac.in/">Center for Indian Language
Technology, Indian Institute of Technology, Bombay</a><br>-->
Technology, Indian Institute of Technology, Bombay</a><br>
<!-- obsolete<a href="http://www.indiaeducation.ernet.in/insitutions/PROFILENEW.ASP?no=U01763">Lal Bahadur Shastri Rashtriya Sanskrit Vidyapeetha, Delhi</a><br>-->
<a href="http://www.slbsrsv.ac.in/home.asp">Lal Bahadur Shastri Rashtriya Sanskrit Vidyapeetha, Delhi</a><br>-->
<a href="http://www.slbsrsv.ac.in/home.asp">Lal Bahadur Shastri Rashtriya Sanskrit Vidyapeetha, Delhi</a><br>
<a href="http://mpsvvujjain.org/">Panini Sanskrit University, Ujjain</a><br>
<a href="http://www.shadvala.de/en/center/">Shadvala Center for Sanskrit Studies, Goa</a><br>
<!-- obsolete <a href="http://www.education.nic.in/htmlweb/prolan.htm">Indian Government Policy on Languages Development</a><br> -->
......@@ -994,7 +994,6 @@ from Vojko (Ljubljana, Slovenia)</a><br>
<a href="http://samskrtaprasruti.wordpress.com/">Sanskrit Prasruti blog</a><br>
<a href="http://samskrtam.wordpress.com/">Sanskrit blog</a><br>
<a href="http://simplesanskrit.wordpress.com/">Simple Sanskrit Lessons by S.L. Abhyankar</a><br>
<a href="http://slabhyankar.wordpress.com/">Study Sanskrit blog by S. L. Abhyankar</a><br>
<a href="http://simplesanskrit.blogspot.fr">Simple Sanskrit blog of G.S.S. Murthy</a><br>
<a href="http://shastrapriyah.blogspot.com/">Shastapriyaa blog by Swami Neelakantha</a><br>
<a href="http://groups.google.com/group/gita-anvaya-sandhi-vigraha">gItA anvaya sandhi vigraha Google group</a><br>
......@@ -1019,6 +1018,7 @@ from Vojko (Ljubljana, Slovenia)</a><br>
<a href="http://www.payer.de/skrtlink.htm">Indien und Sanskrit site, Tuepflis Global Village</a><br>
<a href="http://www.yogapad.de/group/sanskrit/">German Yoga blog</a><br>
<a href="http://sanskritvani.tripod.com/">Samskritavani (spanish)</a><br>
<a href="http://sanskritonstamps.blogspot.com">The Sanskrit Philatelist blog</a><br>
<a href="http://help.berberber.com/sanskrit/">Samskrit for tattoes and such stuff</a><br>
<!-- obsolete <a href="http://www.sanskritquoteoftheday.com/Public/Home/index.cfm">Sanskrit quote of the day</a><br> -->
<a href="http://www.sanskritquoteoftheday.com/">Sanskrit quote of the day</a><br>
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment