? cell
? cell.c
? cellsize.diff
? dict.xt
? paflof
? paflof.s
Index: ref.pl
===================================================================
RCS file: /srv/cvs/openbios/paflof/ref.pl,v
retrieving revision 1.3
diff -u -r1.3 ref.pl
--- ref.pl	2002/05/29 15:30:45	1.3
+++ ref.pl	2002/05/29 18:51:45
@@ -1,6 +1,17 @@
 #!/usr/bin/perl
 
-$CELL = 4;
+open F, ">.cellsize.c";
+print F <<'HERE';
+#include <stdio.h>
+int main(void) 
+{
+	printf("%d\n",(int)sizeof(void *));
+	return 0; 
+}
+HERE
+system("make .cellsize >>.cellsize.log 2>&1");
+$CELL = qx { ./.cellsize };
+system("rm -f .cellsize*");
 
 sub string
 {