Ticket #453: tt453-pmc-h.patch
File tt453-pmc-h.patch, 20.6 KB (added by rurban, 13 years ago) |
---|
-
src/pmc/addrregistry.pmc
old new 25 25 26 26 */ 27 27 28 #include "parrot/parrot.h"29 30 28 /* included manually to prevent breaking C++ builds -- see RT #56534 */ 31 29 #include "parrot/hash.h" 32 30 #include "pmc_hash.h" -
src/pmc/array.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 /* 24 22 25 23 =item C<static PMC *undef(PARROT_INTERP)> -
src/pmc/bigint.pmc
old new 22 22 23 23 */ 24 24 25 #include "parrot/parrot.h"26 27 25 /* TODO split that out into a separate file */ 28 26 29 27 #ifdef S_SPLINT_S -
src/pmc/bignum.pmc
old new 131 131 132 132 */ 133 133 134 #include "parrot/parrot.h"135 136 134 #ifdef S_SPLINT_S 137 135 # undef PARROT_HAS_GMP /* splint barfs on the gmp.h header */ 138 136 #endif /* S_SPLINT_S */ -
src/pmc/boolean.pmc
old new 21 21 22 22 */ 23 23 24 #include "parrot/parrot.h"25 26 24 pmclass Boolean extends Integer provides boolean provides scalar { 27 25 28 26 /* -
src/pmc/bound_nci.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass Bound_NCI extends NCI need_ext { 25 23 26 24 /* -
src/pmc/callsignature.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 #define CAPTURE_DATA_SIZE 2 25 23 #define CAPTURE_array_CREATE(i, obj) \ 26 24 if (!PARROT_CAPTURE(obj)->array) \ -
src/pmc/capture.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 24 22 #define CAPTURE_DATA_SIZE 2 25 23 #define CAPTURE_array_CREATE(i, obj) \ -
src/pmc/codestring.pmc
old new 30 30 31 31 */ 32 32 33 #include "parrot/parrot.h"34 35 33 pmclass CodeString extends String provides string { 36 34 37 35 /* -
src/pmc/complex.pmc
old new 22 22 23 23 */ 24 24 25 #include "parrot/parrot.h"26 27 25 /* 28 26 29 27 =item C<static void -
src/pmc/cpointer.pmc
old new 46 46 47 47 */ 48 48 49 #include "parrot/parrot.h"50 51 49 pmclass CPointer need_ext { 52 50 ATTR void *pointer; /* The stored pointer. */ 53 51 ATTR STRING *sig; /* A string signature for the pointer. */ -
src/pmc/default.pmc
old new 21 21 22 22 */ 23 23 24 #include "parrot/parrot.h"25 26 24 #define INT2KEY(i, k) key_new_integer((i), (k)) 27 25 28 26 /* undef 'interface' to keep MSVC happy */ -
src/pmc/env.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 /* array of environment variables, 24 22 speced in POSIX.1, but not in ISO-C 25 23 MS C compilers know about environ, as it is declared in stdlib.h. -
src/pmc/eventhandler.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass EventHandler extends Sub need_ext { 25 23 26 24 ATTR STRING *type; /* the type of the event to handle */ -
src/pmc/exporter.pmc
old new 78 78 79 79 */ 80 80 81 #include "parrot/parrot.h"82 83 81 /* 84 82 85 83 =back -
src/pmc/file.pmc
old new 22 22 # include <direct.h> 23 23 #endif 24 24 25 #include "parrot/parrot.h"26 27 25 /* RT#46681 apparently, strerror_r is thread-safe and should be used instead.*/ 28 26 29 27 static PMC *File_PMC; -
src/pmc/fixedbooleanarray.pmc
old new 21 21 22 22 */ 23 23 24 #include "parrot/parrot.h"25 26 24 #define BITS_PER_CHAR 8 27 25 28 26 pmclass FixedBooleanArray need_ext provides array { -
src/pmc/fixedfloatarray.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass FixedFloatArray need_ext provides array { 25 23 ATTR INTVAL size; 26 24 ATTR FLOATVAL *float_array; -
src/pmc/fixedintegerarray.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass FixedIntegerArray need_ext provides array { 25 23 ATTR INTVAL size; /* number of INTVALs stored in this array */ 26 24 ATTR INTVAL * int_array; /* INTVALs are stored here */ -
src/pmc/fixedpmcarray.pmc
old new 24 24 25 25 */ 26 26 27 #include "parrot/parrot.h"28 29 27 #define PMC_size(x) ((Parrot_FixedPMCArray_attributes *)PMC_data(x))->size 30 28 #define PMC_array(x) ((Parrot_FixedPMCArray_attributes *)PMC_data(x))->pmc_array 31 29 -
src/pmc/fixedstringarray.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass FixedStringArray need_ext provides array { 25 23 ATTR STRING **str_array; /* where the STRINGs are stored */ 26 24 ATTR UINTVAL size; /* element count */ -
src/pmc/float.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 pmclass Float extends scalar provides float provides scalar { 24 22 ATTR FLOATVAL fv; 25 23 -
src/pmc/integer.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 #include "pmc_bigint.h" 25 23 26 24 static void -
src/pmc/iterator.pmc
old new 61 61 62 62 */ 63 63 64 #include "parrot/parrot.h"65 66 64 pmclass Iterator no_ro { 67 65 ATTR PMC *aggregate; /* the aggregate which this Iterator iterates */ 68 66 ATTR PMC *key; /* the Key used by this Iterator */ -
src/pmc/key.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 pmclass Key need_ext { 24 22 ATTR PMC *next_key; /* Sometimes it's the next key, sometimes it's 25 23 not. The Key code is like that. */ -
src/pmc/lexinfo.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 /* included manually to prevent breaking C++ builds -- see RT #56534*/ 24 22 #include "pmc_hash.h" 25 23 -
src/pmc/lexpad.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 /* 24 22 * LexPad provides a Hash interface for lexical fetch/store 25 23 * needed -
src/pmc/managedstruct.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 25 23 pmclass ManagedStruct extends UnManagedStruct need_ext { 26 24 -
src/pmc/multisub.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 25 23 pmclass MultiSub extends ResizablePMCArray need_ext provides array { 26 24 -
src/pmc/nci.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 typedef INTVAL (*nci_sub_t)(PARROT_INTERP, PMC *); 24 22 typedef INTVAL (*nci_jit_sub_t)(PARROT_INTERP, PMC *, char *); 25 23 -
src/pmc/null.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass Null singleton { 25 23 26 24 /* -
src/pmc/orderedhash.pmc
old new 39 39 40 40 */ 41 41 42 #include "parrot/parrot.h"43 44 42 pmclass OrderedHash extends Hash need_ext provides array provides hash { 45 43 46 44 /* -
src/pmc/os.pmc
old new 29 29 # include <dirent.h> 30 30 #endif 31 31 32 #include "parrot/parrot.h"33 34 32 /* XXX Check if we need to deallocate strerror strings */ 35 33 /* XXX apparently, strerror_r is thread-safe and should be used instead.*/ 36 34 -
src/pmc/packfileannotation.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass PackfileAnnotation { 25 23 26 24 -
src/pmc/packfileannotationkeys.pmc
old new 24 24 25 25 */ 26 26 27 #include "parrot/parrot.h"28 29 27 pmclass PackfileAnnotationKeys { 30 28 31 29 /* -
src/pmc/packfileannotations.pmc
old new 25 25 26 26 */ 27 27 28 #include "parrot/parrot.h"29 30 28 pmclass PackfileAnnotations extends PackfileSegment { 31 29 32 30 -
src/pmc/packfileconstanttable.pmc
old new 24 24 25 25 */ 26 26 27 #include "parrot/parrot.h"28 29 27 static PackFile_Constant * 30 28 getconst(PARROT_INTERP, PackFile_ConstTable *table, int index, int type) 31 29 { -
src/pmc/packfiledirectory.pmc
old new 25 25 26 26 */ 27 27 28 #include "parrot/parrot.h"29 30 28 pmclass PackfileDirectory extends PackfileSegment { 31 29 32 30 -
src/pmc/packfilefixupentry.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 pmclass PackfileFixupEntry { 25 23 26 24 /* -
src/pmc/packfilefixuptable.pmc
old new 24 24 25 25 */ 26 26 27 #include "parrot/parrot.h"28 29 27 pmclass PackfileFixupTable extends PackfileSegment { 30 28 31 29 -
src/pmc/packfilerawsegment.pmc
old new 24 24 25 25 */ 26 26 27 #include "parrot/parrot.h"28 29 27 pmclass PackfileRawSegment extends PackfileSegment { 30 28 31 29 -
src/pmc/packfilesegment.pmc
old new 23 23 24 24 */ 25 25 26 #include "parrot/parrot.h"27 28 26 pmclass PackfileSegment { 29 27 30 28 -
src/pmc/parrotlibrary.pmc
old new 28 28 29 29 */ 30 30 31 #include "parrot/parrot.h"32 33 31 #define PMC_dlhandle(x) ((Parrot_ParrotLibrary_attributes*)PMC_data(x))->dl_handle 34 32 #define PMC_oplib_init(x) ((Parrot_ParrotLibrary_attributes*)PMC_data(x))->oplib_init 35 33 -
src/pmc/pccmethod_test.pmc
old new 10 10 11 11 */ 12 12 13 #include "parrot/parrot.h"14 15 13 pmclass PCCMETHOD_Test need_ext provides hash { 16 14 17 15 -
src/pmc/pointer.pmc
old new 20 20 21 21 */ 22 22 23 #include "parrot/parrot.h"24 25 23 pmclass Pointer need_ext { 26 24 27 25 /* -
src/pmc/random.pmc
old new 20 20 21 21 */ 22 22 23 #include "parrot/parrot.h"24 25 23 static PMC *Rand_PMC; 26 24 27 25 pmclass Random singleton { -
src/pmc/ref.pmc
old new 21 21 22 22 */ 23 23 24 #include "parrot/parrot.h"25 26 24 pmclass Ref provides ref { 27 25 28 26 /* -
src/pmc/resizablebooleanarray.pmc
old new 20 20 21 21 */ 22 22 23 #include "parrot/parrot.h"24 25 23 26 24 #define BITS_PER_CHAR 8 27 25 /* MIN_ALLOC is 8 * BITS_PER_CHAR */ -
src/pmc/resizablefloatarray.pmc
old new 20 20 21 21 */ 22 22 23 #include "parrot/parrot.h"24 25 23 pmclass ResizableFloatArray extends FixedFloatArray need_ext provides array { 26 24 ATTR INTVAL resize_threshold; /* max size before array needs resizing */ 27 25 -
src/pmc/resizableintegerarray.pmc
old new 20 20 21 21 */ 22 22 23 #include "parrot/parrot.h"24 25 23 26 24 pmclass ResizableIntegerArray extends FixedIntegerArray need_ext provides array { 27 25 ATTR INTVAL resize_threshold; /* max size before array needs to be resized */ -
src/pmc/resizablepmcarray.pmc
old new 19 19 20 20 */ 21 21 22 #include "parrot/parrot.h"23 24 22 #define PMC_size(x) ((Parrot_ResizablePMCArray_attributes *)PMC_data(x))->size 25 23 #define PMC_array(x) ((Parrot_ResizablePMCArray_attributes *)PMC_data(x))->pmc_array 26 24 #define PMC_threshold(x) ((Parrot_ResizablePMCArray_attributes *)PMC_data(x))->resize_threshold -
src/pmc/resizablestringarray.pmc
old new 18 18 19 19 */ 20 20 21 #include "parrot/parrot.h"22 23 21 pmclass ResizableStringArray extends FixedStringArray need_ext provides array { 24 22 ATTR UINTVAL resize_threshold; /*max capacity before resizing */ 25 23 -
src/pmc/sharedref.pmc
old new 26 26 27 27 */ 28 28 29 #include "parrot/parrot.h"30 31 29 /* 32 30 * TODO we should catch exceptions around these locks 33 31 * if the vtable meth throws the lock is never unlocked -
src/pmc/slice.pmc
old new 37 37 38 38 */ 39 39 40 #include "parrot/parrot.h"41 42 40 #define VALID_RANGE(r) ((r) && ((INTVAL)(r) != -1)) 43 41 #define RVal_int(u) (u).i 44 42 #define RVal_str(u) (u).s -
src/pmc/string.pmc
old new 20 20 21 21 */ 22 22 23 #include "parrot/parrot.h"24 25 23 pmclass String extends scalar provides string provides scalar { 26 24 ATTR STRING * str_val; 27 25