]>
Commit | Line | Data |
---|---|---|
1 | %{ | |
2 | /* Title: English to Texan translator | |
3 | * Author: Adam Hudd (adam@dadhb1.ti.com) | |
4 | * Date: 5 March 1991 | |
5 | * Version: 1.0 | |
6 | * | |
7 | * Input: stdin | |
8 | * Output: stdout | |
9 | * compile: flex -iL drawl.l ; cc -O lex.yy.c -o drawl | |
10 | */ | |
11 | ||
12 | #include <stdio.h> | |
13 | #include <ctype.h> | |
14 | ||
15 | void changeCase(); | |
16 | %} | |
17 | %% | |
18 | (^|" ")"American" changeCase(" Amerkin"); | |
19 | (^|" ")"California" changeCase(" Caleyfornyuh"); | |
20 | (^|" ")"Dallas" changeCase(" Big D."); | |
21 | (^|" ")"Fort Worth" changeCase(" Fowert Wurth"); | |
22 | (^|" ")"Houston" changeCase(" Useton"); | |
23 | (^|" ")"I don't know" changeCase(" I-O-no"); | |
24 | (^|" ")"I will"|" I'll" changeCase(" Ahl"); | |
25 | (^|" ")"I would" changeCase(" Ahd"); | |
26 | (^|" ")"I " changeCase(" Ah "); | |
27 | (^|" ")"I'm "|" I am " changeCase(" Ahm "); | |
28 | (^|" ")"I've "|" I have " changeCase(" Ahv "); | |
29 | (^|" ")"Mexico" changeCase(" Messyco"); | |
30 | (^|" ")"San Antonio" changeCase(" Santone"); | |
31 | (^|" ")"TV"|" television"|" telly" changeCase(" tayvay"); | |
32 | (^|" ")"Texan" changeCase(" Texun"); | |
33 | (^|" ")"Texas" changeCase(" Teksus"); | |
34 | (^|" ")"a while " changeCase(" uhwahl "); | |
35 | (^|" ")"a " changeCase(" uh "); | |
36 | (^|" ")"about" changeCase(" bout"); | |
37 | (^|" ")"adult" changeCase(" a-dult"); | |
38 | (^|" ")"afraid" changeCase(" frayed"); | |
39 | (^|" ")"and " changeCase(" an "); | |
40 | (^|" ")"anniversary" changeCase(" anavarsry"); | |
41 | (^|" ")"any " changeCase(" no "); | |
42 | (^|" ")"anywhere" changeCase(" anywhare"); | |
43 | (^|" ")"appreciate" changeCase(" preshate"); | |
44 | (^|" ")"april" changeCase(" abrul"); | |
45 | (^|" ")"are going to" changeCase(" sargunna"); | |
46 | (^|" ")"are known" changeCase(" iz node"); | |
47 | (^|" ")"are " changeCase(" is "); | |
48 | (^|" ")"aren't you" changeCase(" arncha"); | |
49 | (^|" ")"at them" changeCase(" attum"); | |
50 | (^|" ")"august" changeCase(" awg-ghust"); | |
51 | (^|" ")"away" changeCase(" awf"); | |
52 | (^|" ")"awkward" changeCase(" aukerd"); | |
53 | (^|" ")"bad" changeCase(" bayud"); | |
54 | (^|" ")"ball" changeCase(" bawl"); | |
55 | (^|" ")"baptists" changeCase(" babtusses"); | |
56 | (^|" ")"barbed" changeCase(" bob"); | |
57 | (^|" ")"be " changeCase(" bay "); | |
58 | (^|" ")"bear" changeCase(" bayur"); | |
59 | (^|" ")"beautiful" changeCase(" butiful"); | |
60 | (^|" ")"because" changeCase(" cuz"); | |
61 | (^|" ")"believe" changeCase(" bleeve"); | |
62 | (^|" ")"bitty" changeCase(" biddy"); | |
63 | (^|" ")"black" changeCase(" blaak"); | |
64 | (^|" ")"blue" changeCase(" bulloo"); | |
65 | (^|" ")"born" changeCase(" bornd"); | |
66 | (^|" ")"brake" changeCase(" brayke"); | |
67 | (^|" ")"break" changeCase(" brayke"); | |
68 | (^|" ")"brick" changeCase(" breck"); | |
69 | (^|" ")"brighter" changeCase(" brotter"); | |
70 | (^|" ")"bringing" changeCase(" brangin"); | |
71 | (^|" ")"brown" changeCase(" braoyone"); | |
72 | (^|" ")"building" changeCase(" bildun"); | |
73 | (^|" ")"bulb" changeCase(" bub"); | |
74 | (^|" ")"call you " changeCase(" cawya "); | |
75 | (^|" ")"called you " changeCase(" cawdja "); | |
76 | (^|" ")"camera" changeCase(" Instuhmatik"); | |
77 | (^|" ")"can't" changeCase(" kaynt"); | |
78 | (^|" ")"can't"|" can not"|" cannot" changeCase(" kaynt"); | |
79 | (^|" ")"capital" changeCase(" captul"); | |
80 | (^|" ")"car " changeCase(" cawer "); | |
81 | (^|" ")"catch" changeCase(" ketch"); | |
82 | (^|" ")"chair" changeCase(" chayer"); | |
83 | (^|" ")"cheer" changeCase(" chair"); | |
84 | (^|" ")"chicken" changeCase(" chikun"); | |
85 | (^|" ")"child" changeCase(" kid"); | |
86 | (^|" ")"children" changeCase(" kids"); | |
87 | (^|" ")"clean" changeCase(" klane"); | |
88 | (^|" ")"climate" changeCase(" kliment"); | |
89 | (^|" ")"cold" changeCase(" code"); | |
90 | (^|" ")"darker" changeCase(" dawerker"); | |
91 | (^|" ")"deaf" changeCase(" dayuf"); | |
92 | (^|" ")"death" changeCase(" dayuth"); | |
93 | (^|" ")"december" changeCase(" deceyumbur"); | |
94 | (^|" ")"definite" changeCase(" defnut"); | |
95 | (^|" ")"did not"|" didn't" changeCase(" didunt"); | |
96 | (^|" ")"did you" changeCase(" dja"); | |
97 | (^|" ")"didn't it" changeCase(" diduhnit"); | |
98 | (^|" ")"different" changeCase(" difernt"); | |
99 | (^|" ")"difficult" changeCase(" difahkult"); | |
100 | (^|" ")"divide" changeCase(" duhvide"); | |
101 | (^|" ")"does" changeCase(" duz"); | |
102 | (^|" ")"doesn't" changeCase(" don't"); | |
103 | (^|" ")"dog " changeCase(" dawg "); | |
104 | (^|" ")"I don't care" changeCase(" don't make no nevur mind to may "); | |
105 | (^|" ")"door" changeCase(" dower"); | |
106 | (^|" ")"dreaming" changeCase(" draimun"); | |
107 | (^|" ")"drink" changeCase(" drank"); | |
108 | (^|" ")"drinking" changeCase(" drankin"); | |
109 | (^|" ")"drive" changeCase(" drahv"); | |
110 | (^|" ")"eight" changeCase(" ate"); | |
111 | (^|" ")"eighteen" changeCase(" a-tane"); | |
112 | (^|" ")"eighth" changeCase(" athd"); | |
113 | (^|" ")"eighty" changeCase(" ady"); | |
114 | (^|" ")"eleven" changeCase(" lebum"); | |
115 | (^|" ")"entire" changeCase(" entahr"); | |
116 | (^|" ")"especially" changeCase(" speshuly"); | |
117 | (^|" ")"even" changeCase(" evun"); | |
118 | (^|" ")"evening" changeCase(" eevnun"); | |
119 | (^|" ")"eventually" changeCase(" eventchly"); | |
120 | (^|" ")"ever" changeCase(" evur"); | |
121 | (^|" ")"every once in a while" changeCase(" evurwonsinawhahl"); | |
122 | (^|" ")"every" changeCase(" evur"); | |
123 | (^|" ")"exactly" changeCase(" zakly"); | |
124 | (^|" ")"executive" changeCase(" zekatuv"); | |
125 | (^|" ")"eye " changeCase(" ah "); | |
126 | (^|" ")"father" changeCase(" papa"); | |
127 | (^|" ")"february" changeCase(" febberyawary"); | |
128 | (^|" ")"fell " changeCase(" fayul "); | |
129 | (^|" ")"fifteen" changeCase(" fiftane"); | |
130 | (^|" ")"fifth" changeCase(" fifd"); | |
131 | (^|" ")"fifty" changeCase(" fifdy"); | |
132 | (^|" ")"fight" changeCase(" fite"); | |
133 | (^|" ")"figure" changeCase(" figger"); | |
134 | (^|" ")"filling" changeCase(" fillin"); | |
135 | (^|" ")"fine" changeCase(" fahn"); | |
136 | (^|" ")"fire" changeCase(" far"); | |
137 | (^|" ")"first" changeCase(" fursd"); | |
138 | (^|" ")"five" changeCase(" fav"); | |
139 | (^|" ")"fixing" changeCase(" fixin"); | |
140 | (^|" ")"flower" changeCase(" flare"); | |
141 | (^|" ")"follow" changeCase(" faller"); | |
142 | (^|" ")"for " changeCase(" fahwar "); | |
143 | (^|" ")"forget" changeCase(" fergit"); | |
144 | (^|" ")"fork" changeCase(" fowerk"); | |
145 | (^|" ")"forty" changeCase(" fardy"); | |
146 | (^|" ")"four" changeCase(" fower"); | |
147 | (^|" ")"fourteen" changeCase(" fortane"); | |
148 | (^|" ")"fourth" changeCase(" fowerth"); | |
149 | (^|" ")"freeze" changeCase(" fraze"); | |
150 | (^|" ")"friday" changeCase(" frydy"); | |
151 | (^|" ")"from" changeCase(" frum"); | |
152 | (^|" ")"front" changeCase(" frunt"); | |
153 | (^|" ")"gas" changeCase(" gayus"); | |
154 | (^|" ")"geography" changeCase(" joggerfee"); | |
155 | (^|" ")"get a hold of you" changeCase(" gittaholdayew"); | |
156 | (^|" ")"get" changeCase(" git"); | |
157 | (^|" ")"going to" changeCase(" gunna"); | |
158 | (^|" ")"going to" changeCase(" mona"); | |
159 | (^|" ")"gold" changeCase(" gode"); | |
160 | (^|" ")"got to " changeCase(" gotta "); | |
161 | (^|" ")"green" changeCase(" grane"); | |
162 | (^|" ")"grey"|" gray" changeCase(" graey"); | |
163 | (^|" ")"guests" changeCase(" guesss"); | |
164 | (^|" ")"guitar" changeCase(" gitahwer"); | |
165 | (^|" ")"gulf" changeCase(" guf"); | |
166 | (^|" ")"hard" changeCase(" hayud"); | |
167 | (^|" ")"have a " changeCase(" havuh "); | |
168 | (^|" ")"have not"|" haven't" changeCase(" habumt"); | |
169 | (^|" ")"have " changeCase(" hav "); | |
170 | (^|" ")"he " changeCase(" hay "); | |
171 | (^|" ")"headed" changeCase(" hardud"); | |
172 | (^|" ")"here" changeCase(" hare"); | |
173 | (^|" ")"high" changeCase(" ha"); | |
174 | (^|" ")"hour" changeCase(" air"); | |
175 | (^|" ")"how are you" changeCase(" hyeru"); | |
176 | (^|" ")"how do you do " changeCase(" howdee "); | |
177 | (^|" ")"huh!" changeCase(" hawh!"); | |
178 | (^|" ")"huh?" changeCase(" hawh?"); | |
179 | (^|" ")"hundred" changeCase(" hunnerd"); | |
180 | (^|" ")"if I " changeCase(" fah "); | |
181 | (^|" ")"if it " changeCase(" hifit "); | |
182 | (^|" ")"if you" changeCase(" few"); | |
183 | (^|" ")"if " changeCase(" hif "); | |
184 | "ing " changeCase("in' "); | |
185 | (^|" ")"ignorance" changeCase(" ignernt"); | |
186 | (^|" ")"indian" changeCase(" hinyun"); | |
187 | (^|" ")"inside" changeCase(" n-sod"); | |
188 | (^|" ")"instead of" changeCase(" instudda"); | |
189 | (^|" ")"institute" changeCase(" instatoot"); | |
190 | (^|" ")"intersection" changeCase(" innersekshun"); | |
191 | (^|" ")"is a " changeCase(" izza "); | |
192 | (^|" ")"is it " changeCase(" izit "); | |
193 | (^|" ")"is that " changeCase(" izzat "); | |
194 | (^|" ")"is that right " changeCase(" zatrot "); | |
195 | (^|" ")"is " changeCase(" iz "); | |
196 | (^|" ")"isn't it " changeCase(" hiduhnit "); | |
197 | (^|" ")"it appears" changeCase(" pears"); | |
198 | (^|" ")"it would" changeCase(" hid"); | |
199 | (^|" ")"it " changeCase(" hit "); | |
200 | (^|" ")"it'd " changeCase(" hid "); | |
201 | (^|" ")"it's"|" it is" changeCase(" hit's"); | |
202 | (^|" ")"jail" changeCase(" jayul"); | |
203 | (^|" ")"january" changeCase(" janyawary"); | |
204 | (^|" ")"jeans" changeCase(" janes"); | |
205 | (^|" ")"jet" changeCase(" jeyut"); | |
206 | (^|" ")"jewelry" changeCase(" julry"); | |
207 | (^|" ")"july" changeCase(" djoolie"); | |
208 | (^|" ")"june" changeCase(" djoon"); | |
209 | (^|" ")"just" changeCase(" gist"); | |
210 | (^|" ")"kind of" changeCase(" kinduh"); | |
211 | (^|" ")"king" changeCase(" kang"); | |
212 | (^|" ")"library" changeCase(" liberry"); | |
213 | (^|" ")"lie" changeCase(" lah"); | |
214 | (^|" ")"life" changeCase(" lahf"); | |
215 | (^|" ")"light" changeCase(" lot"); | |
216 | (^|" ")"lighter" changeCase(" lahter"); | |
217 | (^|" ")"like" changeCase(" lahk"); | |
218 | (^|" ")"little" changeCase(" liddel"); | |
219 | (^|" ")"log" changeCase(" lawg"); | |
220 | (^|" ")"lot of" changeCase(" lottuh"); | |
221 | (^|" ")"lots of" changeCase(" lotsa"); | |
222 | (^|" ")"love" changeCase(" luv"); | |
223 | (^|" ")"mall" changeCase(" mawl"); | |
224 | (^|" ")"march" changeCase(" martch"); | |
225 | (^|" ")"material" changeCase(" mahtearyul"); | |
226 | (^|" ")"may" changeCase(" maey"); | |
227 | (^|" ")"me " changeCase(" may "); | |
228 | (^|" ")"mile" changeCase(" mahl"); | |
229 | (^|" ")"minute" changeCase(" minent"); | |
230 | (^|" ")"monday" changeCase(" mundy"); | |
231 | (^|" ")"mosquito" changeCase(" skeeter"); | |
232 | (^|" ")"moss" changeCase(" mawce"); | |
233 | (^|" ")"mother" changeCase(" ma"); | |
234 | (^|" ")"mroone" changeCase(" maroon"); | |
235 | (^|" ")"my " changeCase(" mah "); | |
236 | (^|" ")"myself" changeCase(" mahsef"); | |
237 | (^|" ")"never" changeCase(" nevur"); | |
238 | (^|" ")"nine" changeCase(" nahn"); | |
239 | (^|" ")"nineteen" changeCase(" nontane"); | |
240 | (^|" ")"nineth" changeCase(" nonth"); | |
241 | (^|" ")"ninety" changeCase(" nondy"); | |
242 | (^|" ")"no " changeCase(" naw "); | |
243 | (^|" ")"nothing" changeCase(" nuthun"); | |
244 | (^|" ")"november" changeCase(" noveyumbur"); | |
245 | (^|" ")"ocean" changeCase(" oshun"); | |
246 | (^|" ")"october" changeCase(" oktobur"); | |
247 | (^|" ")"of " changeCase(" uh "); | |
248 | (^|" ")"off" changeCase(" awf"); | |
249 | (^|" ")"oil" changeCase(" all"); | |
250 | (^|" ")"old " changeCase(" ode "); | |
251 | (^|" ")"one of " changeCase(" wunna "); | |
252 | (^|" ")"one " changeCase(" wun "); | |
253 | (^|" ")"only" changeCase(" monly"); | |
254 | (^|" ")"opposite" changeCase(" opsit"); | |
255 | (^|" ")"orange" changeCase(" arnjuh"); | |
256 | (^|" ")"over there" changeCase(" ovare"); | |
257 | (^|" ")"over" changeCase(" ovur"); | |
258 | (^|" ")"parking" changeCase(" parkin"); | |
259 | (^|" ")"people" changeCase(" paypul"); | |
260 | (^|" ")"picture" changeCase(" pitchur"); | |
261 | (^|" ")"pillow" changeCase(" pillar"); | |
262 | (^|" ")"pine" changeCase(" pahn"); | |
263 | (^|" ")"pink" changeCase(" pank"); | |
264 | (^|" ")"please" changeCase(" playze"); | |
265 | (^|" ")"pretty" changeCase(" purdy"); | |
266 | (^|" ")"probably" changeCase(" probly"); | |
267 | (^|" ")"purple" changeCase(" burpel"); | |
268 | (^|" ")"queen" changeCase(" kwane"); | |
269 | (^|" ")"quit" changeCase(" kewyut"); | |
270 | (^|" ")"rather" changeCase(" ruthur"); | |
271 | (^|" ")"ready" changeCase(" reddy"); | |
272 | (^|" ")"real" changeCase(" reeyul"); | |
273 | (^|" ")"really" changeCase(" rilly"); | |
274 | (^|" ")"red" changeCase(" rayud"); | |
275 | (^|" ")"right" changeCase(" rot"); | |
276 | (^|" ")"ring" changeCase(" rang"); | |
277 | (^|" ")"said" changeCase(" sayud"); | |
278 | (^|" ")"sale" changeCase(" sayul"); | |
279 | (^|" ")"sale"|" sail"|" sell" changeCase(" sayul"); | |
280 | (^|" ")"saturday" changeCase(" sadderdy"); | |
281 | (^|" ")"school" changeCase(" skoo"); | |
282 | (^|" ")"screen" changeCase(" skrane"); | |
283 | (^|" ")"second" changeCase(" sekunt"); | |
284 | (^|" ")"see" changeCase(" say"); | |
285 | (^|" ")"september" changeCase(" ceptimbur"); | |
286 | (^|" ")"seven" changeCase(" sebum"); | |
287 | (^|" ")"seventeen" changeCase(" sebumtane"); | |
288 | (^|" ")"seventh" changeCase(" sebumthd"); | |
289 | (^|" ")"seventy" changeCase(" sebumdy"); | |
290 | (^|" ")"she" changeCase(" shay"); | |
291 | (^|" ")"shirt" changeCase(" churt"); | |
292 | (^|" ")"sign" changeCase(" sahn"); | |
293 | (^|" ")"silver" changeCase(" seeyulvur"); | |
294 | (^|" ")"sit" changeCase(" set"); | |
295 | (^|" ")"sixteen" changeCase(" sickstane"); | |
296 | (^|" ")"sixth" changeCase(" sicksed"); | |
297 | (^|" ")"sixty" changeCase(" sicksdy"); | |
298 | (^|" ")"siz" changeCase(" sicks"); | |
299 | (^|" ")"smell" changeCase(" smayul"); | |
300 | (^|" ")"smile" changeCase(" smahl"); | |
301 | (^|" ")"softer" changeCase(" sowftur"); | |
302 | (^|" ")"some of those" changeCase(" sumoze"); | |
303 | (^|" ")"some" changeCase(" sum"); | |
304 | (^|" ")"something" changeCase(" sumpn"); | |
305 | (^|" ")"sometime" changeCase(" sumtom"); | |
306 | (^|" ")"south" changeCase(" saowth"); | |
307 | (^|" ")"speak" changeCase(" spake"); | |
308 | (^|" ")"spring" changeCase(" sprang"); | |
309 | (^|" ")"sprinkle" changeCase(" sprankul"); | |
310 | (^|" ")"stadium" changeCase(" stadyum"); | |
311 | (^|" ")"station" changeCase(" stayshun"); | |
312 | (^|" ")"string" changeCase(" strang"); | |
313 | (^|" ")"sunday" changeCase(" sundy"); | |
314 | (^|" ")"sure" changeCase(" shore"); | |
315 | (^|" ")"tale"|" tail" changeCase(" tayul"); | |
316 | (^|" ")"talk" changeCase(" tawk"); | |
317 | (^|" ")"talking" changeCase(" tawkin"); | |
318 | (^|" ")"tall" changeCase(" tahl"); | |
319 | (^|" ")"tan" changeCase(" tayun"); | |
320 | (^|" ")"ten" changeCase(" teyun"); | |
321 | (^|" ")"tenth" changeCase(" teyunth"); | |
322 | (^|" ")"terible" changeCase(" tarbul"); | |
323 | (^|" ")"terrible" changeCase(" tarbul"); | |
324 | (^|" ")"that is"|" that's" changeCase(" thets"); | |
325 | (^|" ")"that" changeCase(" thet"); | |
326 | (^|" ")"the only" changeCase(" thonly"); | |
327 | (^|" ")"the other" changeCase(" thuther"); | |
328 | (^|" ")"the" changeCase(" thuh"); | |
329 | (^|" ")"their" changeCase(" thur"); | |
330 | (^|" ")"there" changeCase(" thare"); | |
331 | (^|" ")"there" changeCase(" thayure"); | |
332 | (^|" ")"they" changeCase(" thay"); | |
333 | (^|" ")"thing" changeCase(" thang"); | |
334 | (^|" ")"think" changeCase(" thank"); | |
335 | (^|" ")"third" changeCase(" thurd"); | |
336 | (^|" ")"thirteen" changeCase(" thurtane"); | |
337 | (^|" ")"thirty" changeCase(" thurdy"); | |
338 | (^|" ")"this" changeCase(" thus"); | |
339 | (^|" ")"those" changeCase(" them"); | |
340 | (^|" ")"thousand" changeCase(" thousun"); | |
341 | (^|" ")"three" changeCase(" thray"); | |
342 | (^|" ")"through" changeCase(" thoo"); | |
343 | (^|" ")"throw" changeCase(" thow"); | |
344 | (^|" ")"throw" changeCase(" throw"); | |
345 | (^|" ")"thrown" changeCase(" thowed"); | |
346 | (^|" ")"thursday" changeCase(" thursdy"); | |
347 | (^|" ")"tie" changeCase(" tah"); | |
348 | (^|" ")"tied" changeCase(" tahd"); | |
349 | (^|" ")"tight" changeCase(" tot"); | |
350 | (^|" ")"time" changeCase(" tom"); | |
351 | (^|" ")"to " changeCase(" tuh "); | |
352 | (^|" ")"today" changeCase(" tuhday"); | |
353 | (^|" ")"toilet" changeCase(" outhouse"); | |
354 | (^|" ")"told" changeCase(" tode"); | |
355 | (^|" ")"tommorrow" changeCase(" tuhmorrow"); | |
356 | (^|" ")"tree" changeCase(" tray"); | |
357 | (^|" ")"truck" changeCase(" truk"); | |
358 | (^|" ")"tuesday" changeCase(" chewsdy"); | |
359 | (^|" ")"twelve" changeCase(" twayulv"); | |
360 | (^|" ")"twenty" changeCase(" twindy"); | |
361 | (^|" ")"two " changeCase(" tew "); | |
362 | (^|" ")"understand" changeCase(" understaynd"); | |
363 | (^|" ")"used to" changeCase(" ustuh"); | |
364 | (^|" ")"vehicle" changeCase(" vee-hicul"); | |
365 | (^|" ")"victory" changeCase(" viktray"); | |
366 | (^|" ")"violation" changeCase(" vahlayshun"); | |
367 | (^|" ")"virtual" changeCase(" vurchul"); | |
368 | (^|" ")"want to " changeCase(" wonna "); | |
369 | (^|" ")"was that" changeCase(" wuzzat"); | |
370 | (^|" ")"was" changeCase(" wuz"); | |
371 | (^|" ")"wash" changeCase(" wartch"); | |
372 | (^|" ")"water" changeCase(" warder"); | |
373 | (^|" ")"we " changeCase(" way "); | |
374 | (^|" ")"wedding" changeCase(" wedden"); | |
375 | (^|" ")"wednesday" changeCase(" winsdy"); | |
376 | (^|" ")"well" changeCase(" wayul"); | |
377 | (^|" ")"were " changeCase(" wuz "); | |
378 | (^|" ")"west " changeCase(" wayust "); | |
379 | (^|" ")"what did you" changeCase(" whudja"); | |
380 | (^|" ")"what did" changeCase(" whuddle"); | |
381 | (^|" ")"what do you" changeCase(" wadja"); | |
382 | (^|" ")"what is the matter" changeCase(" smatter"); | |
383 | (^|" ")"what is"|" what's" changeCase(" whut"); | |
384 | (^|" ")"what" changeCase(" whut"); | |
385 | (^|" ")"wheel" changeCase(" whale"); | |
386 | (^|" ")"when" changeCase(" wheyun"); | |
387 | (^|" ")"where did you" changeCase(" whardja"); | |
388 | (^|" ")"where" changeCase(" whar"); | |
389 | (^|" ")"where" changeCase(" whayer"); | |
390 | (^|" ")"white" changeCase(" wot"); | |
391 | (^|" ")"why don't you" changeCase(" y-oncha"); | |
392 | (^|" ")"why" changeCase(" wha"); | |
393 | (^|" ")"wife" changeCase(" waf"); | |
394 | (^|" ")"window" changeCase(" wender"); | |
395 | (^|" ")"winter" changeCase(" winner"); | |
396 | (^|" ")"wire" changeCase(" war"); | |
397 | (^|" ")"with you" changeCase(" witchew"); | |
398 | (^|" ")"woman" changeCase(" whoamun"); | |
399 | (^|" ")"women" changeCase(" wimmen"); | |
400 | (^|" ")"world" changeCase(" warld"); | |
401 | (^|" ")"worse than" changeCase(" worsun"); | |
402 | (^|" ")"yard" changeCase(" chard"); | |
403 | (^|" ")"yellow" changeCase(" yuller"); | |
404 | (^|" ")"yes" changeCase(" u-betcha"); | |
405 | (^|" ")"yes" changeCase(" yayus"); | |
406 | (^|" ")"you " changeCase(" yawl "); | |
407 | (^|" ")"your are"|" you're" changeCase(" yore"); | |
408 | (^|" ")"your" changeCase(" chur"); | |
409 | .|'\n' ECHO; | |
410 | %% | |
411 | main() | |
412 | { | |
413 | yylex(); | |
414 | } | |
415 | ||
416 | void changeCase(word) | |
417 | char *word; | |
418 | { | |
419 | extern char *yytext; | |
420 | ||
421 | /* change o/p to upper/lower based on original text */ | |
422 | if (isupper(*(yytext+1)) && islower(*(word+1))) | |
423 | *(word+1) = toupper(*(word+1)); | |
424 | ||
425 | printf(word); | |
426 | } |