7e3afbba |
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 | } |