Moebius

[G-Rom]

Bah oui , je suis bête , j'ai pas regardé les sources...
Comment as tu eu le nom des commandes pour la gestion interne des objets PB ?

[G-Rom]

étape 4 , ne peut pas copié la lib.

21:56:13 Moebius_Compile_Step0()
21:56:13 Moebius_Compile_Step1()
21:56:13 From > /home/jerome/Bureau/moebieus/Temp/
21:56:13 "/home/jerome/purebasic/compilers/pbcompiler" "/home/jerome/Bureau/moebieus/Sample_Lib/Sample_11.pb" -i -c -e "/home/jerome/Bureau/moebieus/Temp/Sample_11"
21:56:13
******************************************
PureBasic 4.50 Beta 3 (Linux - x86)
******************************************

Loading external modules...
Starting compilation...
92 lines processed.
Creating the executable.

- Feel the ..PuRe.. Power -


21:56:13 Moebius_Compile_Step2()
21:56:13 Load the content of purebasic.asm in a string
21:56:13 Create Functions List from Pure & User Libraries
21:56:13 Extracts information for the future creation of the DESC File
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11Free
21:56:13 LL_DLLFunctions()\FuncName Full> S11Free(Id.l)
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params > Id.l
21:56:13 LL_DLLFunctions()\FuncName Light> S11Free
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType > , Long
21:56:13 LL_DLLFunctions()\ParamsClean > Id.l
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11_Init
21:56:13 LL_DLLFunctions()\FuncName Full> S11_Init()
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params >
21:56:13 LL_DLLFunctions()\FuncName Light> S11_Init
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType >
21:56:13 LL_DLLFunctions()\ParamsClean >
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11_GetType
21:56:13 LL_DLLFunctions()\FuncName Full> .l S11_GetType(Id.l)
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params > Id.l
21:56:13 LL_DLLFunctions()\FuncName Light> S11_GetType
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType > , Long
21:56:13 LL_DLLFunctions()\ParamsClean > Id.l
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11_Create
21:56:13 LL_DLLFunctions()\FuncName Full> .l S11_Create(Id.l,type.l)
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params > Id.l,type.l
21:56:13 LL_DLLFunctions()\FuncName Light> S11_Create
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType > , Long, Long
21:56:13 LL_DLLFunctions()\ParamsClean > Id.l, type.l
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 Remove some ASM code
21:56:13 LL_LibUsed() > window
21:56:13 LL_LibUsed() > gadget
21:56:13 LL_LibUsed() > misc
21:56:13 LL_LibUsed() > date
21:56:13 LL_LibUsed() > event
21:56:13 LL_LibUsed() > 2ddrawing
21:56:13 LL_LibUsed() > image
21:56:13 LL_LibUsed() > imagepluginbmp
21:56:13 LL_LibUsed() > imageplugin
21:56:13 LL_LibUsed() > object
21:56:13 LL_LibUsed() > gtkbase
21:56:13 LL_LibUsed() > simplelist
21:56:13 LL_LibUsed() > shared
21:56:13 LL_ImportUsed() > /home/jerome/purebasic/compilers/objectmanager.a
21:56:13 LL_ImportUsed() > CompilerIf #PB_Compiler_OS = #PB_OS_Windows
21:56:13 LL_ImportUsed() > Import #PB_Compiler_Home+"compilers/objectmanager.a"
21:56:13 LL_ImportUsed() > Object_GetOrAllocateID (Objects, Object.l) As "PB_Object_GetOrAllocateID"
21:56:13 LL_ImportUsed() > Object_GetObject (Objects, Object.l) As "PB_Object_GetObject"
21:56:13 LL_ImportUsed() > Object_IsObject (Objects, Object.l) As "PB_Object_IsObject"
21:56:13 LL_ImportUsed() > Object_EnumerateAll (Objects, ObjectEnumerateAllCallback, *VoidData) As "PB_Object_EnumerateAll"
21:56:13 LL_ImportUsed() > Object_EnumerateStart (Objects) As "PB_Object_EnumerateStart"
21:56:13 LL_ImportUsed() > Object_EnumerateNext (Objects, *object.Long) As "PB_Object_EnumerateNext"
21:56:13 LL_ImportUsed() > Object_EnumerateAbort (Objects) As "PB_Object_EnumerateAbort"
21:56:13 LL_ImportUsed() > Object_FreeID (Objects, Object.l) As "PB_Object_FreeID"
21:56:13 LL_ImportUsed() > Object_Init (StructureSize.l, IncrementStep.l, ObjectFreeFunction) As "PB_Object_Init"
21:56:13 LL_ImportUsed() > Object_GetThreadMemory (MemoryID.l) As "PB_Object_GetThreadMemory"
21:56:13 LL_ImportUsed() > Object_InitThreadMemory (Size.l, InitFunction, EndFunction) As "PB_Object_InitThreadMemory"
21:56:13 LL_ImportUsed() > EndImport
21:56:13 LL_ImportUsed() > CompilerEndIf
21:56:13 LL_ImportUsed() > Structure S_S11_Union
21:56:13 LL_ImportUsed() > URL.s
21:56:13 LL_ImportUsed() > EndStructure
21:56:13 LL_ImportUsed() > Structure S_S11
21:56:13 LL_ImportUsed() > ID.l
21:56:13 LL_ImportUsed() > Type.l
21:56:13 LL_ImportUsed() > StructureUnion
21:56:13 LL_ImportUsed() > Union.S_S11_Union
21:56:13 LL_ImportUsed() > EndStructureUnion
21:56:13 LL_ImportUsed() > EndStructure
21:56:13 LL_ImportUsed() > - Macros
21:56:13 LL_ImportUsed() > Macro S11_ID(object)
21:56:13 LL_ImportUsed() > Macro S11_IS(object)
21:56:13 LL_ImportUsed() > Macro S11_NEW(object)
21:56:13 LL_ImportUsed() > Macro S11_FREEID(object)
21:56:13 LL_ImportUsed() > Macro S11_INITIALIZE(hCloseFunction)
21:56:13 LL_ImportUsed() > ProcedureDLL S11Free(Id.l)
21:56:13 LL_ImportUsed() > Protected *RObject.S_S11
21:56:13 LL_ImportUsed() > If *RObject
21:56:13 LL_ImportUsed() > S11_FREEID(Id)
21:56:13 LL_ImportUsed() > EndIf
21:56:13 LL_ImportUsed() > ProcedureReturn #True
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 LL_ImportUsed() > ProcedureDLL S11_Init()
21:56:13 LL_ImportUsed() > Global S11Objects
21:56:13 LL_ImportUsed() > S11Objects = S11_INITIALIZE(@S11Free())
21:56:13 LL_ImportUsed() > If IsWindow(#PB_Any)
21:56:13 LL_ImportUsed() > EndIf
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 LL_ImportUsed() > ProcedureDLL.l S11_GetType(Id.l)
21:56:13 LL_ImportUsed() > Protected *RObject.S_S11 = S11_ID(Id)
21:56:13 LL_ImportUsed() > If *RObject
21:56:13 LL_ImportUsed() > ProcedureReturn *RObject\Type
21:56:13 LL_ImportUsed() > Else
21:56:13 LL_ImportUsed() > ProcedureReturn -1
21:56:13 LL_ImportUsed() > EndIf
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 LL_ImportUsed() > ProcedureDLL.l S11_Create(Id.l, type.l)
21:56:13 LL_ImportUsed() > Protected *RObject.S_S11 = S11_NEW(Id)
21:56:13 LL_ImportUsed() > With *RObject
21:56:13 LL_ImportUsed() > \ID = *RObject
21:56:13 LL_ImportUsed() > \Type = type
21:56:13 LL_ImportUsed() > EndWith
21:56:13 LL_ImportUsed() > ProcedureReturn *RObject
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 Create ASM Files
21:56:13 Init Function Code
21:56:13 Shared Code
21:56:13 Adding function in LL_DLLFunctions()
21:56:13 Extracting SharedCode from MainFile & Deleting unuseful code
21:56:13 Search extrn
21:56:13 Begin to write the SharedFunction in file
21:56:13 Finish to write the SharedFunction in file
21:56:13 Moebius_Compile_Step3()
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11Free.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11Free.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 504 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11_Init.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11_Init.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 577 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11_GetType.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11_GetType.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 477 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11_Create.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11_Create.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 487 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/Sample_11_Shared.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/Sample_11_Shared.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 617 bytes.

21:56:13
21:56:13 Moebius_Compile_Step4()
21:56:13 Creating descriptor file
21:56:13 ; Langage used to code the library
ASM

; Number of Libraries than the library need
0

; Library Type
LIB

; PureBasic library needed by the library
13
window
gadget
misc
date
event
2ddrawing
image
imagepluginbmp
imageplugin
object
gtkbase
simplelist
shared

; Help directory name
Sample_11

; Library functions
S11Free, Long, (Id.l)
Long | StdCall
S11_Init, ()
InitFunction | StdCall
S11_GetType, Long, (Id.l)
Long | StdCall
S11_Create, Long, Long, (Id.l, type.l)
Long | StdCall

21:56:13 Working on Import
21:56:13 IN > /home/jerome/purebasic/compilers/objectmanager.a
21:56:13 OUT > /home/jerome/Bureau/moebieus/Temp/OBJ/ImportedLib_0.a
21:56:13 Step4 > Error > 21

[Progi1984]

Bah oui , je suis bête , j'ai pas regardé les sources...
Comment as tu eu le nom des commandes pour la gestion interne des objets PB ?

Pas de problème... Errare humanum est....
Suis ce lien : http://www.purebasic.fr/french/viewtopic.php?t=5258

[Progi1984]

étape 4 , ne peut pas copié la lib.

21:56:13 Moebius_Compile_Step0()
21:56:13 Moebius_Compile_Step1()
21:56:13 From > /home/jerome/Bureau/moebieus/Temp/
21:56:13 "/home/jerome/purebasic/compilers/pbcompiler" "/home/jerome/Bureau/moebieus/Sample_Lib/Sample_11.pb" -i -c -e "/home/jerome/Bureau/moebieus/Temp/Sample_11"
21:56:13
******************************************
PureBasic 4.50 Beta 3 (Linux - x86)
******************************************

Loading external modules...
Starting compilation...
92 lines processed.
Creating the executable.

- Feel the ..PuRe.. Power -


21:56:13 Moebius_Compile_Step2()
21:56:13 Load the content of purebasic.asm in a string
21:56:13 Create Functions List from Pure & User Libraries
21:56:13 Extracts information for the future creation of the DESC File
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11Free
21:56:13 LL_DLLFunctions()\FuncName Full> S11Free(Id.l)
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params > Id.l
21:56:13 LL_DLLFunctions()\FuncName Light> S11Free
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType > , Long
21:56:13 LL_DLLFunctions()\ParamsClean > Id.l
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11_Init
21:56:13 LL_DLLFunctions()\FuncName Full> S11_Init()
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params >
21:56:13 LL_DLLFunctions()\FuncName Light> S11_Init
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType >
21:56:13 LL_DLLFunctions()\ParamsClean >
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11_GetType
21:56:13 LL_DLLFunctions()\FuncName Full> .l S11_GetType(Id.l)
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params > Id.l
21:56:13 LL_DLLFunctions()\FuncName Light> S11_GetType
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType > , Long
21:56:13 LL_DLLFunctions()\ParamsClean > Id.l
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 LL_DLLFunctions()\sFuncNameCleared > S11_Create
21:56:13 LL_DLLFunctions()\FuncName Full> .l S11_Create(Id.l,type.l)
21:56:13 LL_DLLFunctions()\CallingConvention > StdCall
21:56:13 LL_DLLFunctions()\FuncDesc >
21:56:13 LL_DLLFunctions()\Params > Id.l,type.l
21:56:13 LL_DLLFunctions()\FuncName Light> S11_Create
21:56:13 LL_DLLFunctions()\FuncRetType > Long
21:56:13 LL_DLLFunctions()\ParamsRetType > , Long, Long
21:56:13 LL_DLLFunctions()\ParamsClean > Id.l, type.l
21:56:13 LL_DLLFunctions()\InDescFile > 1
21:56:13
21:56:13 Remove some ASM code
21:56:13 LL_LibUsed() > window
21:56:13 LL_LibUsed() > gadget
21:56:13 LL_LibUsed() > misc
21:56:13 LL_LibUsed() > date
21:56:13 LL_LibUsed() > event
21:56:13 LL_LibUsed() > 2ddrawing
21:56:13 LL_LibUsed() > image
21:56:13 LL_LibUsed() > imagepluginbmp
21:56:13 LL_LibUsed() > imageplugin
21:56:13 LL_LibUsed() > object
21:56:13 LL_LibUsed() > gtkbase
21:56:13 LL_LibUsed() > simplelist
21:56:13 LL_LibUsed() > shared
21:56:13 LL_ImportUsed() > /home/jerome/purebasic/compilers/objectmanager.a
21:56:13 LL_ImportUsed() > CompilerIf #PB_Compiler_OS = #PB_OS_Windows
21:56:13 LL_ImportUsed() > Import #PB_Compiler_Home+"compilers/objectmanager.a"
21:56:13 LL_ImportUsed() > Object_GetOrAllocateID (Objects, Object.l) As "PB_Object_GetOrAllocateID"
21:56:13 LL_ImportUsed() > Object_GetObject (Objects, Object.l) As "PB_Object_GetObject"
21:56:13 LL_ImportUsed() > Object_IsObject (Objects, Object.l) As "PB_Object_IsObject"
21:56:13 LL_ImportUsed() > Object_EnumerateAll (Objects, ObjectEnumerateAllCallback, *VoidData) As "PB_Object_EnumerateAll"
21:56:13 LL_ImportUsed() > Object_EnumerateStart (Objects) As "PB_Object_EnumerateStart"
21:56:13 LL_ImportUsed() > Object_EnumerateNext (Objects, *object.Long) As "PB_Object_EnumerateNext"
21:56:13 LL_ImportUsed() > Object_EnumerateAbort (Objects) As "PB_Object_EnumerateAbort"
21:56:13 LL_ImportUsed() > Object_FreeID (Objects, Object.l) As "PB_Object_FreeID"
21:56:13 LL_ImportUsed() > Object_Init (StructureSize.l, IncrementStep.l, ObjectFreeFunction) As "PB_Object_Init"
21:56:13 LL_ImportUsed() > Object_GetThreadMemory (MemoryID.l) As "PB_Object_GetThreadMemory"
21:56:13 LL_ImportUsed() > Object_InitThreadMemory (Size.l, InitFunction, EndFunction) As "PB_Object_InitThreadMemory"
21:56:13 LL_ImportUsed() > EndImport
21:56:13 LL_ImportUsed() > CompilerEndIf
21:56:13 LL_ImportUsed() > Structure S_S11_Union
21:56:13 LL_ImportUsed() > URL.s
21:56:13 LL_ImportUsed() > EndStructure
21:56:13 LL_ImportUsed() > Structure S_S11
21:56:13 LL_ImportUsed() > ID.l
21:56:13 LL_ImportUsed() > Type.l
21:56:13 LL_ImportUsed() > StructureUnion
21:56:13 LL_ImportUsed() > Union.S_S11_Union
21:56:13 LL_ImportUsed() > EndStructureUnion
21:56:13 LL_ImportUsed() > EndStructure
21:56:13 LL_ImportUsed() > - Macros
21:56:13 LL_ImportUsed() > Macro S11_ID(object)
21:56:13 LL_ImportUsed() > Macro S11_IS(object)
21:56:13 LL_ImportUsed() > Macro S11_NEW(object)
21:56:13 LL_ImportUsed() > Macro S11_FREEID(object)
21:56:13 LL_ImportUsed() > Macro S11_INITIALIZE(hCloseFunction)
21:56:13 LL_ImportUsed() > ProcedureDLL S11Free(Id.l)
21:56:13 LL_ImportUsed() > Protected *RObject.S_S11
21:56:13 LL_ImportUsed() > If *RObject
21:56:13 LL_ImportUsed() > S11_FREEID(Id)
21:56:13 LL_ImportUsed() > EndIf
21:56:13 LL_ImportUsed() > ProcedureReturn #True
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 LL_ImportUsed() > ProcedureDLL S11_Init()
21:56:13 LL_ImportUsed() > Global S11Objects
21:56:13 LL_ImportUsed() > S11Objects = S11_INITIALIZE(@S11Free())
21:56:13 LL_ImportUsed() > If IsWindow(#PB_Any)
21:56:13 LL_ImportUsed() > EndIf
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 LL_ImportUsed() > ProcedureDLL.l S11_GetType(Id.l)
21:56:13 LL_ImportUsed() > Protected *RObject.S_S11 = S11_ID(Id)
21:56:13 LL_ImportUsed() > If *RObject
21:56:13 LL_ImportUsed() > ProcedureReturn *RObject\Type
21:56:13 LL_ImportUsed() > Else
21:56:13 LL_ImportUsed() > ProcedureReturn -1
21:56:13 LL_ImportUsed() > EndIf
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 LL_ImportUsed() > ProcedureDLL.l S11_Create(Id.l, type.l)
21:56:13 LL_ImportUsed() > Protected *RObject.S_S11 = S11_NEW(Id)
21:56:13 LL_ImportUsed() > With *RObject
21:56:13 LL_ImportUsed() > \ID = *RObject
21:56:13 LL_ImportUsed() > \Type = type
21:56:13 LL_ImportUsed() > EndWith
21:56:13 LL_ImportUsed() > ProcedureReturn *RObject
21:56:13 LL_ImportUsed() > EndProcedure
21:56:13 Create ASM Files
21:56:13 Init Function Code
21:56:13 Shared Code
21:56:13 Adding function in LL_DLLFunctions()
21:56:13 Extracting SharedCode from MainFile & Deleting unuseful code
21:56:13 Search extrn
21:56:13 Begin to write the SharedFunction in file
21:56:13 Finish to write the SharedFunction in file
21:56:13 Moebius_Compile_Step3()
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11Free.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11Free.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 504 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11_Init.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11_Init.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 577 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11_GetType.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11_GetType.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 477 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/S11_Create.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/S11_Create.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 487 bytes.

21:56:13
21:56:13 "/home/jerome/purebasic/compilers/fasm" "/home/jerome/Bureau/moebieus/Temp/ASM/Sample_11_Shared.asm" "/home/jerome/Bureau/moebieus/Temp/OBJ/Sample_11_Shared.o"
21:56:13 FASM String
21:56:13 flat assembler version 1.67.18 (16384 kilobytes memory)
2 passes, 617 bytes.

21:56:13
21:56:13 Moebius_Compile_Step4()
21:56:13 Creating descriptor file
21:56:13 ; Langage used to code the library
ASM

; Number of Libraries than the library need
0

; Library Type
LIB

; PureBasic library needed by the library
13
window
gadget
misc
date
event
2ddrawing
image
imagepluginbmp
imageplugin
object
gtkbase
simplelist
shared

; Help directory name
Sample_11

; Library functions
S11Free, Long, (Id.l)
Long | StdCall
S11_Init, ()
InitFunction | StdCall
S11_GetType, Long, (Id.l)
Long | StdCall
S11_Create, Long, Long, (Id.l, type.l)
Long | StdCall

21:56:13 Working on Import
21:56:13 IN > /home/jerome/purebasic/compilers/objectmanager.a
21:56:13 OUT > /home/jerome/Bureau/moebieus/Temp/OBJ/ImportedLib_0.a
21:56:13 Step4 > Error > 21

Au fait, c'est Moebius et non Moebieus...
Es tu prêt à recompiler Moebius pour les tests ?
Peux tu m'envoyer le fichier ASM ?

[G-Rom]

PureBasic.asm ?

;
; PureBasic x86 4.50 Beta 3 (Linux - x86) - generated code
;
; (c) 2010 Fantaisie Software
;
; The header must remain intact for Re-Assembly
;
; Window
; Gadget
; Misc
; Date
; Event
; 2DDrawing
; Image
; ImagePluginBMP
; ImagePlugin
; Object
; GtkBase
; SimpleList
; Shared
; :System
; :Import
; /home/jerome/purebasic/compilers/objectmanager.a
;
format ELF
;
extrn PB_Object_FreeID
extrn PB_Object_GetObject
extrn PB_Object_GetOrAllocateID
extrn PB_Object_Init
extrn PB_Object_IsObject
extrn exit
extrn memset
;
extrn PB_Event_Init
extrn PB_FreeGtkBase
extrn PB_FreeImages
extrn PB_FreeWindows
extrn PB_Init2DDrawing
extrn PB_InitBMPImageDecoder
extrn PB_InitGadget
extrn PB_InitGtkBase
extrn PB_InitImage
extrn PB_InitImageDecoder
extrn PB_InitWindow
extrn PB_IsWindow
extrn _PB_StringBase
extrn PB_StringBase
extrn SYS_InitString
;
extrn PB_StringBasePosition
public PB_MemoryBase
public PB_ArgC
public PB_ArgV

macro pb_public symbol
{
public symbol
_#symbol:
symbol:
}

;
;
section '.text' executable align 8
;
public main
main:
;
PUSH dword I_BSSEnd-I_BSSStart
PUSH dword 0
PUSH dword I_BSSStart
CALL memset
ADD esp,12
MOV eax, [esp+4]
MOV [PB_ArgC], eax
MOV eax, [esp+8]
MOV [PB_ArgV], eax
CALL SYS_InitString
CALL PB_InitGtkBase
CALL PB_InitImageDecoder
CALL PB_InitBMPImageDecoder
CALL PB_InitImage
CALL PB_Init2DDrawing
CALL PB_Event_Init
CALL PB_InitGadget
CALL PB_InitWindow
;
; CompilerIf #PB_Compiler_OS = #PB_OS_Windows
; Import #PB_Compiler_Home+"compilers/objectmanager.a"
; Object_GetOrAllocateID (Objects, Object.l) As "PB_Object_GetOrAllocateID"
; Object_GetObject (Objects, Object.l) As "PB_Object_GetObject"
; Object_IsObject (Objects, Object.l) As "PB_Object_IsObject"
; Object_EnumerateAll (Objects, ObjectEnumerateAllCallback, *VoidData) As "PB_Object_EnumerateAll"
; Object_EnumerateStart (Objects) As "PB_Object_EnumerateStart"
; Object_EnumerateNext (Objects, *object.Long) As "PB_Object_EnumerateNext"
; Object_EnumerateAbort (Objects) As "PB_Object_EnumerateAbort"
; Object_FreeID (Objects, Object.l) As "PB_Object_FreeID"
; Object_Init (StructureSize.l, IncrementStep.l, ObjectFreeFunction) As "PB_Object_Init"
; Object_GetThreadMemory (MemoryID.l) As "PB_Object_GetThreadMemory"
; Object_InitThreadMemory (Size.l, InitFunction, EndFunction) As "PB_Object_InitThreadMemory"
; EndImport
; CompilerEndIf
;
; Structure S_S11_Union
; URL.s
; EndStructure
; Structure S_S11
; ID.l
; Type.l
; StructureUnion
; Union.S_S11_Union
; EndStructureUnion
; EndStructure
;
; ;- Macros
; Macro S11_ID(object)
; Macro S11_IS(object)
; Macro S11_NEW(object)
; Macro S11_FREEID(object)
; Macro S11_INITIALIZE(hCloseFunction)
;
;
; ProcedureDLL S11Free(Id.l)
macro MP22{
_Procedure22:
PUSH ebx
PS22=16
XOR eax,eax
PUSH eax
PUSH eax
; Protected *RObject.S_S11
; If *RObject
CMP dword [esp],0
JE _EndIf2
; S11_FREEID(Id)
MOV ebx,dword [esp+PS22+0]
CMP ebx,-1
JE No0
PUSH dword [esp+PS22+0]
PUSH dword [esp+8]
CALL PB_Object_IsObject
MOV ebx,eax
CMP ebx,1
JNE No0
Ok0:
MOV eax,1
JMP End0
No0:
XOR eax,eax
End0:
AND eax,eax
JE _EndIf4
PUSH dword [esp+PS22+0]
PUSH dword [esp+8]
CALL PB_Object_FreeID
_EndIf4:
; EndIf
_EndIf2:
; ProcedureReturn #True
MOV eax,1
JMP _EndProcedure23
; EndProcedure
XOR eax,eax
_EndProcedure23:
ADD esp,8
POP ebx
RET 4
}
; ProcedureDLL S11_Init()
macro MP24{
_Procedure24:
PS24=4
; Global S11Objects
; S11Objects = S11_INITIALIZE(@S11Free())
LEA eax,[_Procedure22]
PUSH eax
PUSH dword 1
PUSH dword 12
CALL PB_Object_Init
MOV dword [v_S11Objects],eax
; If IsWindow(#PB_Any)
PUSH dword -1
CALL PB_IsWindow
ADD esp,4
AND eax,eax
JE _EndIf6
; EndIf
_EndIf6:
; EndProcedure
XOR eax,eax
_EndProcedure25:
RET
}
; ProcedureDLL.l S11_GetType(Id.l)
macro MP26{
_Procedure26:
PUSH ebp
PS26=12
XOR eax,eax
PUSH eax
; Protected *RObject.S_S11 = S11_ID(Id)
PUSH dword [esp+PS26+0]
PUSH dword [v_S11Objects]
CALL PB_Object_GetObject
MOV dword [esp],eax
; If *RObject
CMP dword [esp],0
JE _EndIf8
; ProcedureReturn *RObject\Type
MOV ebp,dword [esp]
MOV eax,dword [ebp+4]
JMP _EndProcedure27
; Else
JMP _EndIf7
_EndIf8:
; ProcedureReturn -1
MOV eax,-1
JMP _EndProcedure27
; EndIf
_EndIf7:
; EndProcedure
XOR eax,eax
_EndProcedure27:
ADD esp,4
POP ebp
RET 4
}
; ProcedureDLL.l S11_Create(Id.l, type.l)
macro MP28{
_Procedure28:
PUSH ebp
PS28=12
XOR eax,eax
PUSH eax
; Protected *RObject.S_S11 = S11_NEW(Id)
PUSH dword [esp+PS28+0]
PUSH dword [v_S11Objects]
CALL PB_Object_GetOrAllocateID
MOV dword [esp],eax
; With *RObject
; \ID = *RObject
PUSH dword [esp]
MOV ebp,dword [esp+4]
POP eax
MOV dword [ebp],eax
; \Type = type
PUSH dword [esp+PS28+4]
MOV ebp,dword [esp+4]
POP eax
MOV dword [ebp+4],eax
; EndWith
; ProcedureReturn *RObject
MOV eax,dword [esp]
JMP _EndProcedure29
; EndProcedure
XOR eax,eax
_EndProcedure29:
ADD esp,4
POP ebp
RET 8
}
;
;
_PB_EOP:
_PB_EOP_NoValue:
CALL PB_EndFunctions
PUSH dword [PB_ExitCode]
CALL exit
PB_EndFunctions:
CALL PB_FreeWindows
CALL PB_FreeImages
CALL PB_FreeGtkBase
RET
;
MP28
MP26
MP24
MP22
section '.data' writeable
pb_public PB_DEBUGGER_LineNumber
dd -1
pb_public PB_DEBUGGER_IncludedFiles
dd 0
pb_public PB_DEBUGGER_FileName
db 0
public _SYS_StaticStringStart
_SYS_StaticStringStart:
pb_public PB_NullString
db 0
public _SYS_StaticStringEnd
_SYS_StaticStringEnd:
align 4
align 4
s_s:
dd 0
dd -1
s_s_s11:
dd -3,8,s_s_s11_union
dd -1
s_s_s11_union:
dd 0
dd -1
align 4
;
_PB_BSSSection:
align 4
;
I_BSSStart:
PB_MemoryBase: rd 1
PB_ArgC: rd 1
PB_ArgV: rd 1
PB_ExitCode: rd 1
align 4
v_S11Objects rd 1
PB_DataPointer rd 1
align 4
align 4
align 4
align 4
I_BSSEnd:
section '.data' writeable
SYS_EndDataSection:

[Progi1984]

Nickel...

Es tu prêt à recompiler Moebius ?

Si oui, peux tu tester en rajoutant ces lignes dans Inc_Userlib_Step2.pb

Rajouter à la ligne 414 après

Code : Tout sélectionner

Case ";" ;{

Tu mets

Code : Tout sélectionner

If bInHeader = #True

Rajouter à la ligne 451 (ou 452 après le rajout de ligne) avant

Code : Tout sélectionner

;}

Tu mets

Code : Tout sélectionner

EndIf

Et recompile et reteste avec les exemples...

[G-Rom]

j'ai essayer de faire les modifs , j'ai pas de Inc_Userlib_Step2.pb mais inc_compile_...

If bInHeader = #True

cette variable est déclaré nulle part ( EnableExplicit ) , je l'ai viré , compilé , lancer la gui avec le sample 11
la gui quitte à la fin de la compilation sans message d'erreur.

[Progi1984]

Wow, ca date ces sources avec Inc_Compile...

Tu as téléchargé où les sources ?
Essaie de faire un checkout du SVN

[G-Rom]

je veut bien , mais le lien du svn est down... :/

[Progi1984]

Réessaie un

Code : Tout sélectionner

svn checkout http://moebius-pb.googlecode.com/svn/trunk/ moebius-pb-read-only

[SPH]

Bon, sans faire mon KCC, je comprend rien a ce que vous racontez, mais continuez...

[Progi1984]

Comprendre quoi ?

[G-Rom]

Ca à l'air de re-fonctionner. je te dis dès que je compile

[G-Rom]

Bah écoute , c'est parfait , je dois même dire que sa déchire à mort !
l'ide est nickel , la lib compile sans soucis , du gratin de pro tout ça !

[Progi1984]

Bah écoute , c'est parfait , je dois même dire que sa déchire à mort !
l'ide est nickel , la lib compile sans soucis , du gratin de pro tout ça !

Parfait, j'en ai profité pour mettre à jour le SVN. Et merci pour les compliments !