cvsuser 04/10/08 07:42:04
Modified: . PLATFORMS README
src dod.c smallobject.c
Log:
some notes and fixes
Revision Changes Path
1.28 +8 -1 parrot/PLATFORMS
Index: PLATFORMS
===================================================================
RCS file: /cvs/public/parrot/PLATFORMS,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -w -r1.27 -r1.28
--- PLATFORMS 7 Oct 2004 16:29:24 -0000 1.27
+++ PLATFORMS 8 Oct 2004 14:41:56 -0000 1.28
@@ -49,7 +49,7 @@
JIT ... JIT core is supported
EXEC ... compiling to native executables is supported
Thr ... Parrot is multi-threaded
-Sig ... Parrot catches kind of a SIGINT (program termination) signal
+Sig ... Parrot catches a SIGHUP signal
Comp ... Compiles ok
Test ... Runs "make test"
Inst ... "make install" is ok
@@ -64,3 +64,10 @@
*5 by enabling cygwin in t/pmc/threads.t, some tests fail due to a bug in
that release. 1.5.10-3 and latest snapshots are ok.
+The following configurations are also working on x86/linux (and likely
+other platforms):
+optimized build: perl Configure.pl --optimize
+system malloc: perl Configure.pl --gc=libc
+incremental GC: include/parrot/settings.h PARROT_GC_MS:=0 PARROT_GC_IMS:=1
+arena_dod_flags: include/parrot/settings.h ARENA_DOD_FLAGS:=1
+
1.37 +17 -2 parrot/README
Index: README
===================================================================
RCS file: /cvs/public/parrot/README,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -w -r1.36 -r1.37
--- README 2 Oct 2004 15:19:35 -0000 1.36
+++ README 8 Oct 2004 14:41:56 -0000 1.37
@@ -63,8 +63,12 @@
perl Configure.pl --define=inet_aton
-This will generate a config.h header, a Parrot::Config module, platform
-files and some Makefiles.
+If you want to install Parrot into a non-standard location use
+
+ perl Configure.pl --prefix=/Users/foo/parrot-0.1.1
+
+Running Configure.pl will generate a config.h header, a Parrot::Config
+module, platform files and some Makefiles.
The file "myconfig" has an overview of configure settings.
@@ -92,6 +96,17 @@
make fulltest
+On some systems you can install parrot:
+
+ make install
+
+This installs a bunch of files in /usr/local/parrot-$VERSION. The parrot
+executable is in /usr/local/parrot-$VERSION/bin. Please note that this
+feature is currently experimental. You have to link or copy the executable
+somewhere into your path. Finally no dynamic extensions from
+runtime/parrot/dynext are installed, albeit dynamic extensions are searched
+for in the installed directory structure.
+
Look at docs/parrot.pod and docs/intro.pod for where to go from here.
If you have any problems, see the section "Reporting Problems" in
docs/intro.pod. These documents are in POD format. You can view these files
1.135 +3 -2 parrot/src/dod.c
Index: dod.c
===================================================================
RCS file: /cvs/public/parrot/src/dod.c,v
retrieving revision 1.134
retrieving revision 1.135
diff -u -w -r1.134 -r1.135
--- dod.c 2 Oct 2004 15:22:05 -0000 1.134
+++ dod.c 8 Oct 2004 14:42:03 -0000 1.135
@@ -1,6 +1,6 @@
/*
Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-$Id: dod.c,v 1.134 2004/10/02 15:22:05 jrieks Exp $
+$Id: dod.c,v 1.135 2004/10/08 14:42:03 leo Exp $
=head1 NAME
@@ -1122,7 +1122,8 @@
#if ARENA_DOD_FLAGS
clear_live_counter(interpreter, arena_base->pmc_pool);
for (j = 0; j < (INTVAL)arena_base->num_sized; j++) {
- header_pool = arena_base->sized_header_pools[j];
+ struct Small_Object_Pool *header_pool =
+ arena_base->sized_header_pools[j];
if (header_pool)
clear_live_counter(interpreter, header_pool);
}
1.53 +1 -2 parrot/src/smallobject.c
Index: smallobject.c
===================================================================
RCS file: /cvs/public/parrot/src/smallobject.c,v
retrieving revision 1.52
retrieving revision 1.53
diff -u -w -r1.52 -r1.53
--- smallobject.c 8 Sep 2004 00:33:58 -0000 1.52
+++ smallobject.c 8 Oct 2004 14:42:03 -0000 1.53
@@ -1,6 +1,6 @@
/*
Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-$Id: smallobject.c,v 1.52 2004/09/08 00:33:58 dan Exp $
+$Id: smallobject.c,v 1.53 2004/10/08 14:42:03 leo Exp $
=head1 NAME
@@ -480,7 +480,6 @@
pool->add_free_object = add_free_object_fn;
pool->get_free_object = get_free_object_fn;
#if ARENA_DOD_FLAGS
- assert(0);
if (object_size >= sizeof(Dead_PObj))
pool->get_free_object = get_free_object_df;
#endif
