Ticket #1: barnowl-pony.patch
File barnowl-pony.patch, 59.0 KB (added by andersk@MIT.EDU, 17 years ago) |
---|
-
owl/codelist.pl
1 #! /usr/bin/perl 2 # $Id$ 1 use Acme::Pony; 3 2 4 if ($#ARGV eq -1) { 5 @ARGV=`ls *.c`; 6 chop(@ARGV); 7 } 3 b 4 U fFy 5 bufFybUfF 6 YbuFFybUFfy 7 buffYbuffyBuFfybuF 8 fyBufFYbufFybUffybuFf 9 yBufFyBuFFYbufFybUFfYbUff 10 ybufFybUfFybUFfYbufFYBuffyb 11 uFfyBuFFyBufFybuFFybUffYbUffyb 12 uffYbuFFyBUFFybUfFybuffybufFybu 13 ffybUffybuffYbuffybuFfybuffybUfFybu 14 ffYbuFfyBuFfYBUffyBufFYbUfFyBuFFYBuff 15 ybufFYbufFYbUFfYBufFYBuffybuFfybUfFyBuf 16 fYBUfFybUFfybUFfybuffYBuFFyBUFfybUfFybuff 17 ybufFybuffybUffybuffYbuffybuFfyBUffyBUffy 18 bUfFYbUFFYbUFfybufFYBuffyBuFfybuffybUfFybuff 19 YbuFfyBuFfYBUffyBufFYbUfFyBufFyBufFYbUFFybuFfY 20 buffYbUFFYBufFyBuffybUfFybuffYBufFYbUFFYbUFfyB 21 ufFYBuFfYbuFFyBuffyBUfFYbufFYbuffYbUFfybuffYbuf 22 fYbuFfybUFfyBUfFybUfFYbufFYbUFfYbUffYBuffybuFfyb 23 ufFyBuffybuffYbUffybuFfyBufFyBuFFYbufFybUFfYbUfFyb 24 UfFybuffybUffYBuFFYBufFyBuffybuffyBuffybufFybuffybU 25 ffybuffYbuFFYBuFFybuffYBUfFyBufFYbuFFYbUFfybuFfYb 26 ufFYbufFyBufFybUffyBUffYbUfFybuFfybUFfYbuffybuFf 27 ybuFfyBuffYBufFYbUffYbUFfybUFfYBuFfYbuFFyBufFyB 28 ufFYbUFFybuFfYbuffyBuFfybuffybuFfybuffyBu 29 ffybufFybuffybUffybufFYBufFybUFFyBufFyB 30 UffYBUfFYbufFyBUFfybuffYbufFybuFfyBUFFyB 31 uffYbUfFybuffybUffYbUFfYbuFfYBuFfyBuFFyB 32 ufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBuf FyBUfF 33 ybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUf FYbUffYbUF 34 fYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfY BuFfyBuFFyBufF 35 yBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUf FYbUffYbUFfYbuFfYB 36 uFfybuffyBuffyBufFybuFFybUFfYbuFfYBuffYBuFFyBuFfyBU ffybufFybUfFYbUffY 37 bUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuF FyBufFyBUfFybUfFYbU 38 ffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbU ffYbUFfYbuFfYBuFfyBu 39 FFyB ufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuffybuFfybUfFyBufFYBUfFybufFYBuFfyBUFfYBu 40 fFybuFfyBUf FYBuffYbUffybuffybUffybuffYbuffybuFfybuffyBufFYBuFFYbuffYbUFfYbuFfYBuffYBuFFyBuFfyBUffybufFybuffYbUffybUFF 41 YbufFYbufFyBufFyb UffyBUffYbUfFybuFfyBUFFYbuFfyBuFfybuffyBufFYbUFFYbuFfYbuffYbuFfybuFfyBuFFybUFfyBUffybufFybuffYbUffYBUFfYbuf 42 FYBUfFybuFFYbUfFYbuFfYbUFFYbUffyBuFfybuFfyBuffybuffyBuffybufFybuffybUffybuffYbufFYbuFfybUFfyBuffybufFybuffYbUffYBUFfYbuffYBUfFyB 43 UfFYBUffyBUFfYbUFfyBUFfyBuFfYbuffYbuFfyBUFFyBuffybufFybufFYBUFfybUFFYBuffybuFfyBUFFyBuffyBUFfYbUffYbUffybUFFyBuFFybUFFybUfFyBuffy 44 BufFybUFFYb UffYbuFfYbufFyBuffyBufFybuffybufFybuffybUffybuffYbuffybuFfybUFfyBuffYBufFybuffybUffYbuffYbuFFYBuFfybuFFYbUfFyBUFFYbUFFYb 45 UffyBuFfyb uFfyBuffybuffyBuffybufFybuffybUffybuffYbufFYbuFfybUFfyBuffybufFybUffybUffYBUFfYbufFYBUfFybuFFYbUfFYbUFFYbUFFYbUffyBuFfyb 46 uFfyBuffybu ffyBuffybufFybuffybUffybuffYbufFYbuFfybUFfyBuffybufFybUffybUffYBUFfYbufFYBUfFyBUffyBufFYBUfFybuFfYbuffYbuFfybuffybuF 47 fybuffyBuff ybufFybuffybUffyBUffYbufFYbuFfybuffyBufFybufFybUFFYbUffyBUFFyBuFFybUFFybuFfYBUfFybufFYbufFyBUFfYbuFfYBuFFybuFFyBUFFy 48 BuffYbUffy bUffYbuffybuffYbuffybuFfybuffyBuffybufFybuFFybUffyBUffYbuffybuFfyBuffyBufFYBUfFybuFFYBuFfYBufFYBuFfyBUFFyBUffYBUff 49 yBuFFYbUf FybUFfYbUFfYBuFFYBuFfybUfFybufFybUffybuffybUffybuffYbuffybuFfybuffyBuffYBufFybuFFybUffybuffYbuFfybuFfyBUFFyBuffY 50 BUFfYbuffYB uFfYBufFyBuFFYBuFfybUfFybufFybUffybuffybUffybuffYbuffybuFfybuffyBuffYBufFybuFFybUffybuffYbuFfybuFfyBUFFyBuffyB 51 UFfYbUFFYbUf fybUFFyBufFyBuFfyBUFFyBuffYbUffybUffYbuffybuffYbuffybuFfybuffyBuffybufFybuFFybUffyBUffYbuffybuFfyBuffyBufFYBUf 52 FybuFfYBu FfYBUfFyBufFybUfFyBufFybUffyBuFfYbUfFybuFfYBUFfyBuffybUfFybuFfYbUfFybUffYbUFFYbuFfyBUFfyBuFFybUfFyBUFFyBuffYb 53 UffybUffY buffybuffYbuffybuFfybuffyBuffybufFybuFFybUffyBUffYbuffybuFfyBuffyBufFYBUfFybUFFYbUFfYBUfFYBuffYBuFFybUFfy 54 BUfFybuf FYbUffYbUFfYbUFfYBuFFYBUfFybuffYBUffYbuFFYbUffYbUFfyBUfFYBuFFYBuFfyBufFyBuffYbUffybUffYbuffYBuFFYBufF 55 yBuffybUfFybufFybUffybuffybUffybuffYbuffybuFfybuffyBufFYbuFFYbUFFYbUffybUFFyBuFFybUFFyBUfFyBuffyBU 56 FfYbUFfYBUFfYB UFfYbuffYBUfFyBUfFYBufFYBUfFybUFfYBUffyBuFfybuFfyBuffybuffyBuffybufFyb 57 uffybUffybuff YbuFFybUFFyBUFFyBuffyBUFfYbUffYbUffYBuFFyBuffybuFfybuFF 58 YbUffyBuFFYb UfFYBuFfyBuFfYbuffYbuFfyBUFFyBuffyBUFfYbUffYbUffybUF 59 FyBuFFyBUFfy BUFFyBufFYbUFFybuFfYbuffYbu FfybuffybuFfybuffyBuff 60 ybufFybuffyb UffybufFYBufFybUFFyBufFyBU ffYBUfFYbufFyBUFfybuf 61 fYbufFybuFfy BuFfyBUffybUFFYbufFyBUFf YbUffYBufFybUFFybUFFyB 62 UffybufFyb uFfybUffYBuFFYbufFyBuf fyBufFybuffybufFybuff 63 ybUffybuff YbuffybuFfybuffYBUff YbuFFYbUffYbUFfyBUFf 64 YBuffYbUFF yBUfFYBuffYbUffybU ffYbuffYbUFFYBuffyb 65 uFfyBuFfyB UffyBUfFYbUFfyBUF fYbuFfYBufFYbuFFybu 66 ffyBuffybU fFybUFFYbUffyBUF FyBuFFybuFfyBufFyB 67 UffYBufFYb UFFYbUffybuffYbuffY BUFFybuFFYBUffybuf 68 FybUFFYbUf fyBUFFyBuFFybuFfyBuFf yBUffyBUfFYbUFfyB 69 UFfYbUffYB uFFYBuF fybuffyBuff yBUFFYbufFYBUFfyb 70 uffYbuFFY BuFfy bUFFYbUfF YbufFybUfFybUFfy 71 BUFfYBuf fYbuFFy BufFyBUff YBufFYbUFFYbUf 72 fYbuFfY buffybuFf yBUfFYB UffYbUffybUff 73 Ybuffyb uffYbuff ybuFfyb uffyBuffybu 74 fFybuff yBUFfyB ufFYBuF fyBuFFybUF 75 FyBUff yBuFF YbUFfY BUffyBuF 76 fybuFf yBuffy BuFFYBU 77 ffYbUf fybUff Ybuff 78 ybuffYbu ffybuF 79 fybuffyB uffybu 80 fFybuFfYb uffybuff 81 YbuffybuF fybuffyB 82 uffybuf 83 FybUfF 8 84 9 foreach $file (@ARGV) {10 open(FILE, $file);11 85 12 print "/* -------------------------------- $file -------------------------------- */\n"; 13 while (<FILE>) { 14 if (/^\S/ 15 && (/\{\s*$/ || /\)\s*$/) 16 && !/\}/ 17 && !/^\{/ 18 && !/^#/ 19 && !/^static/ 20 && !/^system/ 21 && !/^XS/ 22 && !/\/\*/ 23 && !/ZWRITEOPTIONS/ 24 && !/owlfaim_priv/) 25 { 26 27 s/\s+\{/\;/; 28 s/\)[ \t]*$/\)\;/; 29 print "extern "; 30 print; 31 } elsif (/^#if/ || /^#else/ || /^#endif/) { 32 print; 33 } 34 35 } 36 close(FILE); 37 print "\n"; 38 } 39 40 86 YBUFfyBuFfybuffybuFfybuffyBuffybufFybuffybUffYBuffYBuffYBuFFyBUFFyBUfFYbuFFYbUfFybUFfybuFfYbufFYbufFyBufFybUffyBUffYbUfFybuFfYbuFfYbuFFyBUFfybUfFybuffybufFybuffybUffybuffYbuffybuFfybuffYBUffYbuFFYbUffYbUFfyBUFfYBuffYbUFFybuffyBuffYbufFybufFYBuFfyBUFfYBufFybuFfyBUfFYBuffYbUffybUfFYBUFfyBuFfybufFyBuffybUfFybuffYbUffybUFFYBuFfYBUFFyBuFfYbufFybUFFybUffyBuffYbUFFYBuFfYBUFFyBu -
owl/stubgen.pl
1 use Acme::Pony; 1 2 2 # $Id$ 3 B 4 Uff 5 y Buffyb 6 ufFybufFybUffYb 7 uFfyBuffYbuFFybU 8 fFYBuffybufFybUFf 9 yBUFfybUfFYBuFfYbUFFy 10 bUffyBUfFYBufFYbUfFybUFfyBUFf 11 YBufFYBuFfybuffYBUffyBUfFYbuffyb 12 UffYbUfFYbuffybuFfybUffYBuffybuFFybu 13 ffyBUffyBufFYbuFfYBuFfybuffYBuffYBuFFyb 14 UfFYbUffyBufFYbuffyBUFfybuffyBuffybuFFybu 15 FFyBUffyBuFFYbuFfybUFfybufFYBuffYbUFFybufFy 16 BUffYbuFFYbufFyBUfFybuffyBuffYBUfFYbUffYBUFfYBU 17 ffYBufFybUFFyBuFfyBUffYBUfFYbuffybUffybUffYbufFyBu 18 ffybUfFybufFybUfFYbuFFybUFfybuffYbuffyBuFfybuFfyBufF 19 YbufFybUffybuFfyBufFyBuFFYbufFybUFfYbUffybufFybUfFybUFf 20 YbufFYBuffybuFfyBuFFyBufFybuFFybUffYbUffybuffYbuFFyBUFFyb 21 UfFybuffybufFybuffybUffybuffYbuffybuFfybuffybUfFybuffYbuFfy 22 BuFfYBUffyBufFYbUfFyBuFFYBuffybufFYbufFYbUFfYBufFYBuffybuFfyb 23 UfFyBuffYBUfFybUFfybUFfybuffYBuFFyBUFfybUfFybuffybufFybuffybUff 24 ybuffYbuffybuFfyBUffyBUffybUfFYbUFFYbUFfybufFYBuffyBuFfybuffybUfFy 25 buffYbuFfyBuFfYBUffyBufFYbUfFyBufFyBufFYbUFFybuFfYbuffYbUFFYBufFyBu 26 ffybUfFybuffybuFFYbuFfyBUFfYbuFfYBufFYBuFFybuFfYBUffybufFybUffyBUFfYb 27 ufFYBuffyBuFfyBUFFyBuffYbUfFybuffybUffybUfFyBuffyBufFyBufFybUfFYbuFfYbu 28 ffybUffyBUffyBuFfyBufFybuFFybUfFyBuffYbuffybUffYBUfFyBuFfybufFyBUffYbUff 29 ybufFybUffybuFfYbUfFyBuffYbUfFyBUFFybUfFYBuffYbUfFybuFfyBUFfyBuFfYbufFybU 30 ffYbUfFybuffYbufFyBuFfYbUffyBuffYbufFybuffyBuffYbuffYbUffYBuFfybuffYbuFFybU 31 fFybuFfYbUfFyBuFfYbuFfybuFfYBUffyBuFfYbufFybUFFybUffYBUfFybuffyBuFfybUFfyBuf 32 fybuFfyBuFFyBufFyBUfFybUfFYbUffybuffYbuffYbufFyBUFFybUffybufFybuFFYbuFfYBUFfyB 33 uffYbUfFybuffyBufFyBuffYbufFybuFfYbuFfyBuffYbUfFybuffyBuffYbuffYbUffYBuFfybuff 34 YbuffyBufFyBuffybUffYBUffYbufFybuFfYbuffYbuFfybuFfyBuffyBuffybufFybuFfYbUffYBUFf 35 YbuffYBUfFybUFFyBUffyBUFfYbuFFYbUFfYbuFfYbuFFyBUFfybUfFybuffybuFFYbuFfyBUFfYbuFfY 36 BufFYBuFFybuFfYBUffybufFybUffyBUFfYbufFYBuffyBuFfyBUffyBufFybUfFYbuFFYbUFfYBuffYBuf 37 fYBuFFyBuFfYBUffyBufFYbUfFybUFfybuffYbufFybuFfyBUFFyBUfFYBuFFYbufFYbUFfyBUFfYbuffyBu 38 FFybUffyBufFybUfFybUFfYBUffyBuFfybufFyBuffybUFfyBUfFYBUfFYbuFfyBUFfYbUffYBuFfybuFFyB 39 UffyBUffybUfFYbuffybUffybUffYbufFYbuFFyBufFyBUffyBUfFYbUfFybUFfybuffYbuffyBuFfybuff 40 ybUfFybuffYbuFfyBuFfYBUffyBufFYbUfFyBufFyBuffybufFybUFfYBUFfyBuFfybuffybuFfybuffyB 41 uffybufFybuffybUffYBUFfYBuffybUFFyBuFfyBUffYBUfFYbuffYbUffyBUffyBuFfyBufFybuFFybU 42 fFyBuffYbufFYbUffybuffYbuffYbuFfybUFfyBUfFybUfFYbufFYbUFfYbUffYBuFfyBuFfyBUfFYBu 43 ffYbUffybuFfYbuffybuffYbuffybuFfybuffyBuffybufFybuffyBUFfyBufFYBuFfyBuFFybUFFy 44 BUffyBuFFYbuffybUffyBuffYbuFFYBuFfybUfFyBuffybufFybUfFYbUffYbUFfYbuFfYBuFfy 45 BuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUF 46 fYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBU 47 fFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBu 48 FfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuffybuFfybuFfyBuffYBufFYbUffYbUF 49 fybUFfYBuFfYbuFFybuffyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFy 50 BUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuF 51 fyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffYbUF fYbuFf 52 YBuFfyBuFFyBufFyBUfFybUfFYbUffYbUFfYbuFfYBuFfyBuFFyBufFyBUfFybUfFYbUffy buffYbufFyBu 53 FfyBUFFyBuffyBUFfYbuFFYbUFfyBuffYbuFFyBUFfybUfFybuffybufFybuffybUffybuffY buffybuFfyBUFfY 54 BUffybUfFYbUffYbUFfybUFfYBuFfYbuFFybuffyBuffybUfFybufFYBUffyBUffyBuFfyBufFy buFFybUfFyBuffYbuFF 55 YBUffYbuFfYbuffybuFfyBUfFYBUffYbUffybUffYbuffYbuFfYBufFYbuFFybuffyBuffybUfFybU fFYbUFfybUFFYBufFYBUfFy 56 buFFYbUfFYbuFFYbuFfYbUffYBUFfyBuFFYbUfFybuFFybUffYBuFfYbUffybuFfyBufFyBuFFYBUfFyb ufFyBufFYbUFfYbUffybuFfYbU 57 FfYbufFyBUfFyBUFFYbUffybuFFybUfFYbUffYbuFFYbuFfYBUfFyBUfFyBufFybUfFybufFYBuFfYBufFY BufFyBuFfybuFFYbUffybUfFybuf 58 FYBuFfYBufFYBufFyBuFfybUffyBuffybUfFybUFfYBuFfyBUFFyBufFybuFfyBuFFYbUfFYbUfFybUffYbUf fyBuffYbuffYBUfFyBUffYBUffYbU 59 fFybUFFYbUffybUFFyBufFyBuFfybuFFYbUfFYbuFFYbuFfYbUffYbUffYbuFFYBufFyBUFfYBUffyBUfFYbuFFyBuF fYbuffYBufFybUFFyBUffYbUffyBuF 60 FYbUfFyBUFfyBuffYBufFyBUFfyBUFFYBuffybUfFybUFfYBuFfYbuffYBuFfYBuFfybUfFYBUffybuFFybUfFYbUffYbuFF YbuFFYBUfFyBuFFYbUfFYbUfFybUffY 61 bUffYBUFFYbuffYBUfFyBUffYBUffYbUfFybufFYBuFfyBuFfYbuFFYBuFfybuFFYBUfFybUfFybuffybUffYBuFFYBuffybuFfybuffyBuffy bufFybUFfybUffybuffYbufFybuFfybU 62 fFybuffybufFybuffybUffybuffYbuffybuFfyBuFFyBUfFybUFFYbuffybUffybUffYbufFYbUFFyBuffyBUffYbuFFYbufFyBUFfYbuFFYBuffybUFFyBuFfyBUffybufFybU fFYBUffybuffYbuffYbuFfyBuffYBufFY 63 bUFFyb uFfYbuffybuffYbuffybuFfybuffyBuffybufFybUfFYbUFfYbuFFYBuffybuFfybuFfyBuffYBuFFYbUffybUFfyBufFYBufFYBuFFyBuffyBUfFyBUfFYbUfFybUFfybuffYbuFfYBUFfybuffyBuffyBufFybuFfyBUffYBuFFYbuf 64 FyBuffybuffy BuffybufFybuffybUffybuffYbuFfYBuFFyBufFYBUffybufFybufFybUffYbuffYBuffYBuFFybuFfYBUffYBuFFYbUffybUFfyBufFYBufFYBuFFyBuffyBUfFyBUfFYbUfFybUFfybuffYbuFfYBUFfybuffyBuffyBufFybuFfyBUf 65 fYBuFFYbufFyBuffyb uffyBuffybufFybuffybUffybuffYbuffYbuFfyBuffyBUffyBUfFYbufFyBUFfyBUfFYBuFfybuFFybUffYBUffYBUfFYbUffybUFfYbUFfYBuFfYbuFFybuffyBufFyBUFFybuffybUffybUffYbuFFybUFfybuffyBufFybUfFYbuF 66 FybUFfybuffYbuffyBuFfyb uFfyBufFYbuFFybUffYbUffYBuFFYbufFyBuffybuffyBuffybufFybuffybUffybuffYbuFfyBuFFybUFfyBUffybufFybuffYbUffybUffYbufFYbUFFyBuffyBUffYbuFFYbufFyBUFfYbuFFYBuffybUFFyBuFfyBUffybufFybUfF 67 YBUffyBUFFYBuffybuFfyBUFFyBu ffYBUFfYbuFfybuFfYBUFfyBuFFYBufFybuFFybUfFYBUfFybUffYbUffybuffYbuFFyBUFFybUfFybufFybUffybuffyBUFfyBufFYBuFfyBuFFybUFFyBUffyBuFFYbuffybUffyBuffYbufFYbUFFyBUFFyBUfFybUfFYbufFybUFfy 68 buffYbuFFYBuFFyBUFfYBUffyBUfFYb UFFYBuFfYBUffYBuffYBuFFyBUFFyBUffYbufFYbUffybUFfybUFfYBuFFYBUfFyBUffYBUfFyBufFYbufFyBUFfYBUFFyBuffYbuFfyBUfFYBUfFybufFYbufFYbUFfybUfFYBufFYbUFFyBuffyBUffYbuFFYbuFFYbUFfYbuffYBuFfYBu 69 FFyBuFfyBUfFyBUFFYbUFFYBuFfYBUFfYBufFYBuFFybufFyBufFYBUfFYbUFFyBUFfybUFfYBuFFYBUfFyBUFfyBUffyBUfFYbUFFYbUFfyBuffYBuFfybuFFybuFFyBUffybufFybuFfYbUffYBUffYBuFfyBuFfybuffyBufFYbUFFYbufFYBuFfyBUFfYBufFybuFfyBUfFYBuffYb 70 UffybUffYbuffybufFYBufFybUFFyBufFyBUffYBUfFYbufFyBUFfybuffYbufFybuFfybuffyBuffybufFybUFFYbUFfYBUfFYBuffYBuFFyBUFFYbUffYBuFFYbUffybUFfyBufFYBuFfyBuFFyBuffyBUffYbufFYbufFYbUFfYbUffYBuFFYBUfFyBUffYBUfFyBufFYbufFyBUFfYBUF 71 FyBufFybuFFyBUFFy BUfFYBUfFYbufFYbUFfYBUFFyBuFFYBuFFybUFFyBUffybUfFybuFFybUffYBUffYBuFfYBuFfybUFFYBuffYBuFFYbUffybUFfyBufFYBuFFybUFFybuFFyBuffybufFybufFYBuFfyBuffYbuffYbuFfybUFfYBUfFybufFYbuFfyBUFfyBUFfYBuFfybuFFyBuFFy 72 BUfFyBufFYbufFYBu FfyBuffYbuFfyBuFfyBUfFYBuffyBUFfYbuFFYbUFfYbUFFYBuffYBUfFybUFFyBUffYbufFybUFfYBUffyBuFfybuFfyBuffybuffYBUffYbuFFYbUffYbUFfyBUFfYBuffYbUFFybuffyBuffYbufFybuFFyBUFfYBUFfYBuFfyBuFFybuFfyBUffybufFybUFFYb 73 UFfYBUfFYBuffYBuF FyBUFFYbUfFYBufFYbufFYbUFfYBUFfYBufFybuFFyBuffyBUffyBUfFYbUFFYBuFfYBufFYBuFfYbuFFybuFfYBUfFYBUFfYbufFybUffYBuFFYBuFfybuFFybuFFyBUffyBuFFYbuFFyBUFfYbuffYBufFybUFFybUFFyBUfFybufFYbUfFYbUFfYbUffYBuFfYB 74 UFFyBUFFYbUfFYBUfF YbuFFybUFfyBUffYBuffyBuFfyBUFFyBUfFYBuFFYbufFYbUFfYBUFFyBuFFYbuFFybuFFyBUfFYBUfFYbuFfybUFfYbuffYBuffYBuFFybuffyBuffYbUfFybUFFybUFfYbuFfYbuffybuFfyBUfFYBUffyBUFfYbuFFYbUFfyBuffYbuFFyBUFfybUfFybufFy 75 bUffybuffyBUFfyBuf FYBuFfyBuFFybUFFyBUffyBuFFYbuffybUffyBuffYbuffybuFfybuffyBufFYBUfFYbUFFyBUFfybUFfYBuFFYBUfFybUFfYBUfFybufFYbuFfyBUFfYbuFfYBuFfybuFFybUffyBUffyBUfFYbUfFybUFfYBUFFyBuFFybUFFyBuFfyBUffyBuFFYbUFFYBu 76 FfyBuffYBuFFYBuFFy BUFFyBUffyBUfFYbUFFYBuFfYBUFfYBufFYbuFFybUFfyBUffybUfFybuFFybUffYBUffYBuFfYBuFfybUFFYBuffYBuFFYbUffybUFfyBufFYBuFFybUFFybuFFyBuffybufFybufFYBuFfyBuffYbuffYbuFfybUFfYBUfFybufFYbuFfyBUFfyBUFfYBuF 77 fybuFFyBuFFyBUfFyB ufFYbufFYBuFfyBuffYbuFfyBuFfyBUfFYBuffyBUFfYbuFFYbUFfYbUFFYBuffYBUfFybUFFyBUffYbufFybUFfYBUffyBuFfybuFfyBuffybuffYBUffYbuFFYbUffYbUFfyBUFfYBuffYbUFFybuffyBuffYbufFybUffYbUFfyBUFfYBuffYbUFFybuf 78 fyBufFYBUfFYbUFFy BUFfybUFfYBuFFYBUfFyBUFfyBUffyBUfFYbUFFYbUFfyBuffYBuFfybuFFybuFFyBUfFYBUFfYbUffYbUFfYBufFYBuFFYBUfFybuFfyBufFybufFYbufFYbUFfybUfFYBufFYbUFFyBuffyBUffYbuFFYbuFFYbUFfYbuffYBuFfYBuFFyBuFfyBUffy 79 bUfFybUFFYbUFf YBUfFYBuffYBuFFyBUFFYbUfFYBufFYbufFYbUFfYBUFfYBufFybuFFyBuffyBUffyBUfFYbuffybUffyBuFfYbuFFYbuFFyBufFyBuffybufFybUFfYBUFfybUFFyBufFYBuFFybUffyBufFYbUFFybuFfYbuffYbuFfybuffybUFFybUffYBUfFybUf 80 FYbuFFYbUFfybUfF YBuffybuFfybUffyBuffybufFybuffybUffyBufFYBuFfYbuFFybuFfYBUfFyBuFFYbuFfyBUFfyBUFfYBuffybuFfyBUFFyBUfFYBuFFYbufFYbUFfYBUFFyBufFYbUFFyBuffyBUffYbuFFYbUffYbUFfYbuffYBufFybuFFybuFFyBUfFyBufFY 81 bUFFYBuFfYBUffYBu FfYbuFFybuFfYBUfFYBUFfYbuFfybUFfYBUFfYBuFFYBuFFybuFFyBUffybUfFybuFFybUffYBUffYBuFfYBuFfybUFFYBuffYBuFFYbUffybUFfyBufFYBuFFybUFFybuFFyBuffybufFybufFYBuFfyBuffYbuffYbuFfybUFfYBUfFybufFYbu 82 FfyBUFfyBUFfYBuFfyb uFFyBuFFyBUfFyBufFYbufFYBuFfyBuffYbuFfyBuFfyBUfFYBuffyBUFfYbuFFYbUFfYbUFFYBuffYBUfFybUFFyBUffYbufFybUFfYBUffyBuFfybuffybuFfybuffyBuffybufFybuffybUffYbUFFYBuffybuFfyBuFfyBUffyBUfFYbUF 83 fyBUFfYbuFfYBufFYb uFFybuffyBuffybUfFybufFybUffyBUfFYBuFfybuFFybUffYBUffyBuFFYbUffYBUFfybufFYBuFfYbuFFybuffyBufFyBUFFybuFFYBUFfybuffYbuFFYBuFfybUFFYbUffybuFfYbUffybuFfybUfFyBuffyBufFyBUFFyBuffybufFybU 84 FFYbUFfyBufFYBuffy buFfybuFfyBuffYBuFFYbUffybUFfyBufFYBuffYbUFFyBufFYBUffybuFFYbUfFybUFfybuffYbuFfYBUFfybUFFYBUffybufFybUFFYbUffyBUFFyBuFFybUfFybuFfYbUffYbuFfYbUffYbuFfyBUFfyBuFFYbufFyBUFFyBufFybUfF 85 ybuffybUffYBuFFY BufFyBuffyBufFybuffybuFFYbuFfyBUFfYbuFfYBufFYBuFFybuFfYBUffybufFybuFfybUffyBUfFYBuFFYBuFFyBufFyBUffyBufFYbuffybUffYBUFfYBuFFYbUFFybuFFyBUfFYBUFfYbUFFybUFfybUFfYBuFFYBuFFybUffyBUf 86 FybufFYbufFYbUF fYBUFFyBuFFybUFFyBuFfyBUffyBuFFYbUFFYBuFfybUffYbuFfybuFFybuFFyBUffyBuFFYbuFFyBUFfYbuffYBufFybUFFybUFFyBUfFybufFYbUfFYbUFfYbUffYBuffyBuFfyBUFFyBUfFYBuFFYbufFYbUFfYBUFFyBuFFYbu 87 FFybuFFyBUfFYB UfFYbuFfybUFfYbuffYBuffYBuFFybuffyBuffYbUfFybUFFybUFfybUFfYbuffybuFfyBUffyBUffybUfFYbUffybUFfyBufFYBuffybuFfybUfFyBuffyBuFFYbUfFybUFfybuFFYBuffYbUFFyBufFyBuffybufFybUFfYBU 88 FfybUFFyBufF YBuFFybUffyBufFYbUFFybuFfYbuffYbuFfybuffybUFFybUffYBUfFybUfFYbuFFYbUFfybUfFYBuffybuFfybUffyBuffybufFybuffybUffYBUFfYBuFFYbUFFybuFFyBUfFYBUFfYbuFFyBUFfYbuffYBufFybUFFyBu 89 fFyBUfFybu fFYbuFfybUFfybUFfYBuFfYbuFFyBUFFYbUfFYbuFFYbUfFybUFfybUfFYBuFFYBUfFyBUffYBUffyBuFFYbuFfyBUFfYbuFfYBufFYBuFFyBUFfyBUffybUfFybuFFybUffYBUffYBuFfYBuFfybUFFYBuffYBuFFYbUf 90 fybUFfyB ufFYBuFFybUFFybuFFyBuffybufFybufFYBuFfyBuffYbuffYbuFfybUFfYBUfFybufFYbuFfyBUFfyBUFfYBuFfybuFFyBuFFyBUfFyBufFYbufFYBuFfyBuffYbuffYBuFfybuffyBuffyBuFFYbUfFybUFfybuFFY 91 BuffYbUFFyBufFyBufFYbUFFybufFYBu FfyBUFfYBuFfYBUFFybuFFYbUffYBUfFYbuFfybUffYBuFFYbufFyBuffyBufFybuffybuFFYbuFfyBUFfYbuFfYBufFYBuFFybuFfYBUffybufFybuFfybUffYBuf 92 fYBuffyBuFFyBuffyBUffYb uFFYbuffybUffyBuFfYbuFFYBuFFyBUFfYBUffyBUfFYbUFFYBuFfYBUffYBuffYBuFFyBUFFyBUffYbufFYbUffybUFfybUFfYBuFFYBUfFyBUFfyBUf 93 FyBufFYbufFyBUFfYBUFFy BuffYbuFfyBuffyBUffyBUfFYbufFyBUFfyBUfFYBuFfybuFFybUffYBUffYBUfFYbUffybUFfYbUFfYBuFfYbuFFybufFyBufFYBUfFYbUFFy 94 BUFfybUFfYBuFFYBUfFyB UFfyBUffyBUfFYbUFFYbUFfyBuffYBuFfybuFFybuFFyBUffybufFybuFfYbUffYBUffYBuFfyBuFfybuffyBufFYbU 95 FFYbufFYBuFfyBUFfYBu fFybuFfyBUfFYBuffYbUffybUffYbuffybufFYBufFybUFFyBufFyBUffYBUfFYbufFyBUFfybuffYbufFybuFfy 96 buffyBuffybufFybuFfy BUFfYbUffYBuffYbUFFyBuFfYBUffYbuFFYbuFFYbUFfybuf fYbuFFYBuFFyBUFfYBUffyBUfFYbUFFYBuFfy 97 BUfFYBuFfybuFFybUffY BUfFybUfFYbUffybUFfyBuffYBuffYBuFFyBuFfyBUfFY BUFfYbUFFybUFfYbUffYBuffYbUFFyBUFFYbU 98 fFYbuFFYbufFyBUFfyBu fFYBuFfyBuFFybUFFyBUfFYBufFYbuffYbUffyBUffYb uFFYbuFFyBuFFyBuffYBUFFybuFFyBUFfYbu 99 ffYBufFybUFFyBUffYBU ffyBUfFybuffybUffybUFFyBufFybuFfybuFfyBuff YBuFFYbUffybUFfyBufFYBufFYBuFFyBuffy 100 BUfFyBUfFYbUfFybUFfy bUFFyBufFybuFfyBufFyBufFYbUFFybufFYBuFfy BUFfYBuFfYBUFFybuFFYbUffYBUfFYbuFfyb 101 UffYBuFFYbufFyBuff ybuffyBuffybufFybuffybUffybuffYbuFfYBU FFybuffyBufFyBufFYbufFYbUFfYBufFYB 102 uFfyBuFFybUFfyBUff ybufFybuffYbUffybUffYbufFYbUFFyBuffy BUffYbuFFYbufFyBUFfYbuFFYBuffybUFF 103 yBuFfyBUffybufFybU fFYBUffyBUFFYBuffybuFfyBUFFyBuffY BUFfYbUffYbuFfyBUFfyBuffYbUfFyBUF 104 FyBuffybufFybUFFY bUFfyBufFYBuffybuFfybuFfyBuffYB uFFYbUffybUFfyBufFYBuffYbUFFyBufF 105 YBUffybuFFYbUfFy bUFfybuffYbuFfYBUFfybUFFYBUff ybufFybUFFYbUffyBUFFyBuFfYbufFyb 106 UFFybUfFyBuFfYbU fFYbuFfYBUFfYbuFfyBuFfybuffy BufFYbUFFYbuFfYbuffYbuFfybuffyb 107 UFFybUffYBUfFybU fFYbuFFYbUFfybUfFYBuffybuFf ybUffyBuffYBuFFYbUFFYbUFfYbuFfY 108 BuffYbuFFybuffy BufFYBUfFYbUFFyBUFfybUFfYB uFFYBUfFyBUFfyBUffyBUfFYbUFFYb 109 UFfyBuffYBuFfyb uFFybuFFyBUfFYBUFfYbUFfyBUFfY bUffYBuffYbUFFyBUFFYbUffyBufFy 110 bUffybUFfybUFfY BuffYbUFFybUFfYBUfFybufFYbuFfy BUFfyBUFfYBuFfybuFFyBuFFyBUfF 111 yBufFYbuffYbUff YBUFfYBuFFYbUFFybuFFyBUfFYBUFfYb UFFybUFfybUFfYBuFFYBuFFybUffy 112 BUfFybufFYbufFY bUFfybuffYbufFyBuFfyBUFfyBUffyBUfFy buffybUffYbuFfYBufFYBuFFybuF 113 fYBUffybufFybuF FYbUFfYbuFfYbu ffybuFfyBUfFYBUffyB UFfYbuFFYbUFfyBuffYbuFFyBUFf 114 ybUfFybufFybUf fybuffyBUFfy BufFYBuFfyBuFFybU FFyBUffyBuFFYbuffybUffyBuff 115 YbuffybuFfybuf fyBufFYB UfFYbUFFyBUFfy bUFfYBuFFYBUfFybUFfYBUfFyb 116 ufFYbuFfyBUFf YbuFfYBuFf ybuFFybUffyBUf fyBUfFYbUfFybUFfYBUFFyBu 117 FFybUFFyBuFfy BUffyBuFFYbUF FYBuFfYbuFfYBu fFYBuFFybuFfYBUffybUfFy 118 buFFybUffYBU ffYBuFfYBuFfyb UFFYBuffYBuFF YbUffybUFfyBufFYBuFFyb 119 UFFybuFFyBuf fybufFybufFYBuF fyBuffYbuffY buFfybUFfYBUfFybufFY 120 buFfyBUFfyBU FfYBuFfybuFFyB uFFyBUfFyBuf FYbufFYBuFfyBuffYb 121 uffYBuFfybuf fyBuffYBUfFYbU ffYbUffYBuFF YbuffYBUfFybUFFyB 122 UfFyBUFFYbu fFYBuFfyBUFfY BufFybuFfyBU fFYBuffYbUffybU 123 ffYbuffybuf FYBufFyb UFFyBufFyBUf fYBUfFYbufFyB 124 UFfybuffYb ufFyb uFfyBufFyBU ffYBUfFYbufF 125 yBUFfybuff YbuFFYBuFFy BUFfYBUffyB 126 UfFYbUFFYB uFfYBUffYBu ffYBuFFyBU 127 FFyBUffYbuf FYbUffybUFf ybUFfYBu 128 FFYBUfFyBUFfy BUfFyBufFY 129 bufFyBUFfYBUFFy BuffYbuFfy 130 BuffyBUffyBUf FYbufFyBUF 131 fyBUfFYBuFfyb uFFybUffYBUf 132 fYBUfFYbUffybU FfYbUFfYBuFfYb 133 uFFybufFyBufFY BUfFYbUFFyB 134 UFfybUFfYBuFF YBUfFyBUFf 135 yBUffyBUfFYbU FFYbUFfyBu 136 ffYBuFfybu 137 FFybuFFyBU 3 138 4 if ($#ARGV eq -1) {5 @ARGV=`ls *.c`;6 chop(@ARGV);7 }8 139 9 print qq(/* THIS FILE WAS AUTOGENERATED BY STUBGEN.PL --- DO NOT EDIT BY HAND!!! */\n\n); 10 print qq(#include "owl.h"); 11 12 foreach $file (@ARGV) { 13 open(FILE, $file); 14 15 print "/* -------------------------------- $file -------------------------------- */\n"; 16 while (<FILE>) { 17 if (m|^\s*OWLVAR_([A-Z_0-9]+)\s*\(\s*"([^"]+)"\s*/\*\s*%OwlVarStub:?([a-z0-9_]+)?\s*\*/|) { # " 18 my $vartype = $1; 19 my $varname = $2; 20 my $altvarname = $2; 21 $altvarname = $3 if ($3); 22 if ($vartype =~ /^BOOL/) { 23 print "void owl_global_set_${altvarname}_on(owl_global *g) {\n"; 24 print " owl_variable_set_bool_on(&g->vars, \"$varname\");\n}\n"; 25 print "void owl_global_set_${altvarname}_off(owl_global *g) {\n"; 26 print " owl_variable_set_bool_off(&g->vars, \"$varname\");\n}\n"; 27 print "int owl_global_is_$altvarname(owl_global *g) {\n"; 28 print " return owl_variable_get_bool(&g->vars, \"$varname\");\n}\n"; 29 } elsif ($vartype =~ /^PATH/ or $vartype =~ /^STRING/) { 30 print "void owl_global_set_$altvarname(owl_global *g, char *text) {\n"; 31 print " owl_variable_set_string(&g->vars, \"$varname\", text);\n}\n"; 32 print "char *owl_global_get_$altvarname(owl_global *g) {\n"; 33 print " return owl_variable_get_string(&g->vars, \"$varname\");\n}\n"; 34 } elsif ($vartype =~ /^INT/ or $vartype =~ /^ENUM/) { 35 print "void owl_global_set_$altvarname(owl_global *g, int n) {\n"; 36 print " owl_variable_set_int(&g->vars, \"$varname\", n);\n}\n"; 37 print "int owl_global_get_$altvarname(owl_global *g) {\n"; 38 print " return owl_variable_get_int(&g->vars, \"$varname\");\n}\n"; 39 } 40 } 41 } 42 close(FILE); 43 print "\n"; 44 } 140 ffybufFybuFfYbUffYBUffYBuFfyBuFfybuffyBufFYbUFFYbufFYBuFfyBUFfYBufFybuFfyBUfFYBuffYbUffybUffYbuffybufFYBufFybUFFyBufFyBUffYBUfFYbufFyBUFfybuffYbufFybuFfybuffyBuffybufFybuFfyBUFfYbUffYBuffYbUFFyBuFfYBUffYbuFFYbuFFYbUFfybuffYbuFFYBuFFyBUFfYBUffyBUfFYbUFFYBuFfyBUfFYBuFfybuFFybUffYBUfFybUfFYbUffybUFfyBuffYBuffYBuFFyBuFfyBUfFYBUFfYbUFFybUFfYbUffYBuffYbUFFyBUFFYbUfFybUfFYbuFFYbUFfybUfFYBuffyBuFfybUFfyBufFYBufFYbUfFYbUffyBUFFYbufFYbUFFyBuffyBUffYbuFFYbUFfyBUFfybUFfYbuffybuFfybuFFYbUffYbufFybufFybUffyBUfFYBuFfybuFFybUffYBUffYBUfFYbUffybUFfYbUFfYBuFfYbuFFybuFFYbUffYbufFybUffYbUffYBuFFYbuffYBUfFybUFFyBUfFyBUFFYbufFYBuFfyBUFfYBufFybuFfyBUfFYBuffYbUffybuffybUffybuffYbuffybuFfybuffyBufFyBUFFYbuffybUffyBuFfybuffybuFfybuffyBuffybufFybuffybUffYbUFFYBufFyBuffybuffyBuffybufFybuffybUffybuffYbuFfYBUFFybUfFybuffybufFybuffybUffybuffYbuffybuFfyBUffyBUffyBUfFYbUFFYbUFfYBufFYBuFfYbuFFybufFyBuffYBuffYbUffYbuFfybUFfyBuFfYbufFyBufFyBufFYbUFFybuFfYbuffybuffYbuffybuFfybuffyBuffybufFybuffyBUFfyBufFYBuFfyBuFFybUFFyBUffyBuFFYbuffybUffyBuffYbuffYBUfFybUFFyBUffYbufFybUFfYBUffyBuFfybuFfYBUFFybUfFybuffYbUffybUFFYBuFfYBUFFyBuFfYbufFybUFFybUffyBuffYbUFFYBuFfYBUFFyBu -
owl/encapsulate.pl
1 #!/usr/bin/perl 2 # 3 # $Id$ 4 # 1 use Acme::Pony; 5 2 6 my $infile = $ARGV[0] or die "Usage: $0 infile structname"; 7 my $structname = $ARGV[1] or die "Usage: $0 infile structname";; 8 open INF, "<$infile" or die "Unable to open $infile"; 3 b 4 UfFybufF 5 yBUfFYbUf 6 fYBUFfybuffYbuf 7 fYbuFfyBufFyBUffYB 8 UfFYbuFFybUFfYbuFfYBu 9 ffYBuFFyBuFfyBUffybufF 10 ybUfFYBUffybuffYbuffYbuFf 11 yBuffybUffYbuFfYbUFFybuFfyBUf 12 FyBuFFyBUfFybuffYBufFyBUFfYbuff 13 ybUffYBUFfYBufFybUFFybuffyBuffyBu 14 fFYbUffYbUFfYbUffYBuffybuFfybUffyB 15 ufFyBuFfYbUFfyBUFfYbuffYBuFFYbuFFyBu 16 FfyBUffYbUFFybuffybUffybUffYbuffybUFf 17 ybuffyBufFybUfFYbuFFYbUFfyBUffYBuFfyBu 18 FFybuFFyBUfFyBufFYbuffybUffYBufFYBuffYbU 19 FFybUffYBUfFyBuFFYbUFfybUFfybUfFYBufFYBuFF 20 yBuffyBUfFyBUfFYbUfFybUFfyBuffYbuFFyBUFfybU 21 fFybufFyBUfFYbUffYBUFfybuffYbuffYbuFfyBUff 22 YBUffyBuFFYbuFfyBUFfYbUfFYBuFFybuFFybuFfY 23 BUffYBUfFYbUffybUFfYbUFfYBuFfYbuFFybuf 24 fyBufFyBUFFybuffybUffybUffYbuFfyb 25 ufFybUffYbUfFYBuffYbuFFyBuFfYBuFFy 26 BuFfybUFfyBuFFYbUffybufFybUFFYbUFf 27 yBufFYBuffybuFfybuFfyBUfFybUfFYbUfFy bUFfy 28 buffYbufFybuFfyBuFfYbUfFYbuFFYbUffybUF fYBUffYBuF 29 fYbuFFybUfFYBuffybufFybufFybUffybufFYbu ffybuFfyBufFy 30 BUffYBUfFYbuFFybUFfYbuFfYBuffYBuFFyBuFfyBUf fybufFybUFfyBUF 31 fybUfFYBufFybUFFyBuFfYBUfFYbufFYbufFyBUFfyBUFfYB uFfybuFFyBuFFyBU 32 fFyBufFYbuFfybUffYBuFFYbuFFyBUFfybUfFybufFYBUfFYbuffyBUFfYbUffYBufFY BuFFybuffyBufFybU 33 ffYb uFFYbuFfyBUffyBuffYBuFfybuffyBuffYbufFybufFYBUffybUffYbuFfyBuFFybUFFyBUffYBufFYbUffYbUFfy 34 bUFfYBuFfY buFFybUffyBuffybufFybUFFYbUFfyBufFYBuffybuFfybuFfyBUfFybUfFYbUfFybUFfybuffYbufFybuFfyBuFfY 35 bUffYBUfFYbUffy bUFfyBuffYBuffYBuFFyBuFfyBUffybufFybufFyBUFfYBUFfYBuffybuFfyBUFFyBUffybuFFYbUfFybUFfyBUFfY 36 BuffybuFfybuFfyBufFybUfFYbuFFYbUFfyBUffYBuFfyBuFFybuFFyBUfFyBufFYbuFfybUffYBuFFYbufFyBuffybUfFybuffybuFFYbuF 37 fyBUFfYbu FfYBufFYBuFFybuFfYBUffybufFybuFfybUffYBUFfYbufFyBuFfybuffyBuffyBuFfYbuffYbUFfYbuFfYBuFFybUFFybuffyBuf 38 fYBufFYb UffYbUFfybUFfYBuFfYbuFFybuffyBufFYBuFFYbUffybUFfYBufFYBuffybuFfyBuffyBUfFyBuFFYbufFyBUFfYBUFfYBuFFYb 39 uFFyBuFfy BUffYBUfFYbUfFybUFfyBufFYBuFfybuFFybuFfYBUfFyBufFYbufFybUFfybuffYbufFYbuFFybUffYBUfFYBUfFYbUfFYbU 40 FfybuffYb uffYbuFfyBufFyBUffYBUfFYbuFFybUFfYbuFfYBuffYBuFFyBuFfyBUffYBUfFybuffybUffybuffYbuffYbufFyBUFFyb 41 UffybufF ybuFFYbuFfYBUFfyBuffYbUfFybuffyBufFyBuffYbufFybuFfYbuFfyBuffYbUfFybuffyBufFybufFybUffybUffYbu 42 ffYbuFfybu FfybuffyBuffYbUfFybUFFYbUffybUFFyBufFYBuFFybuFFYbUffYBUfFYbuFfybUffYBuFFYbufFyBuffybuffYBUf 43 fYbuFFYbUf fYbUFfyBUFfYBuffYbUFFybuffyBuffYbufFybUFfybUFfybuFfYBuFfybuFFybUffYBUffybufFybuFfYbUffybUf 44 fYbuFFyb UFFybuFfYBUffYbuFFYbUfFyBUFfYBuffYBuffYbUFFybUFFyBUfFybufFYbUfFYbUFfYbUffYBuffybuFfyBuF 45 FYBuffyb ufFybufFYBuFfyBUFfYBufFybuFfyBUfFYBuffYbUffybuFFybUFfYBUFfYBufFybUFFybuffyBufFyBUfFY 46 bUffYB UFfybuffYbuffYbuFfybufFYBUffybufFybuffYbUffybUFFYbuFfyBufFybUFFybUffYBuffYbuFFYBUff 47 YbuFfYbuffyb uFfyBUfFYBUffYbUffybuffybUffybuffYbuffybuFfybuffyBufFYbufFY 48 buffYbUFfYB UFfYBuFfYBuFFybuffYBUffybufFybufFybUffybuFFYBu 49 FFyBUFfybU fFybuffybufFybuffybUffybuffYbuffybuFfybuFfyBu 50 ffybUFFYbu ffybUffYbUFFYbufFYBUFFy buffyBufFYbuFFYbUF 51 FYbUffybUF FyBuffYBUfFyBUFFyBuff yBUFfYbufFYBuFfybU 52 FFyBuffYB UfFyBUFFyBufFYBufFY bUFfYBUffyBuFfybuf 53 fybuFfybu ffyBuffybufFybuff ybUffybUffYbuffyB 54 UFFybuff yBufFyBUFFybuFF YBUFfybuffYbuFFy 55 bUFFyBUF FyBuffYbufFybU FFYbUffybUFFyBuf 56 fYBUfFyb UffyBufFYBUfFyb UFFybUFfYBuFFYbu 57 fFyBuffy buffyBuffybufFybu ffybUffybuffYbu 58 ffybUFFy bUffYB UfFybUfFYb uFFYbUFfybUfFYB 59 uffybuF fyBuf fYBUfFyb uFFYbuffYbUff 60 ybuffYb uffybuF fybuffyB uffYbufFybuf 61 FybUffy buFFYBuf fYBUfF ybuFFYbUffY 62 BUfFYbu FfybUff ybUFFy BufFYBuFF 63 yBufFy BufF YbUFFy buFfYbu 64 ffYbUF FYBufF yBuffyb 65 uffYBUf fYbuF 66 FYbUffY bUFfy 67 BUFfYBuf fYbUFFy 68 buffyBuf fYbuf 69 Fybuf 70 fybUff 9 71 10 print "/* This file was autogenerated from $infile. DO NOT EDIT !!!! */\n\n";11 print "char *$structname = \n";12 for my $x (<INF>) {13 chomp $x;14 $x =~ s/\\/\\\\/g;15 $x =~ s/"/\\"/g;16 print qq( "$x\\n"\n);17 }18 print " ;\n";19 72 20 close INF; 73 ybuffYbuffybuFfyBUfFYBuffyBUFfYbuFFYbUFfyBuffYbuFFyBUFfybUfFybuffYbUffybUFfybUFfybUFfYBuFFYBuFFyBUffYBUfFyBufFYbuffybUffYbuFfyBufFYBufFybUFfybUfFYbUFFybuFfYbuffyBuFfybuFFYBUfFyBUFFYbUfFyBuffYbuFFYbuFfybUffyBuFFYBUfFyBUFFYbUf