Răsfoiți Sursa

* fixed go32v2,win32 build

peter 25 ani în urmă
părinte
comite
78f6ad1916
7 a modificat fișierele cu 137 adăugiri și 92 ștergeri
  1. 60 42
      fcl/go32v2/Makefile
  2. 1 0
      fcl/go32v2/Makefile.fpc
  3. 9 2
      fcl/inc/classes.inc
  4. 4 4
      fcl/linux/classes.pp
  5. 2 2
      fcl/tests/testcgi.pp
  6. 60 42
      fcl/win32/Makefile
  7. 1 0
      fcl/win32/Makefile.fpc

+ 60 - 42
fcl/go32v2/Makefile

@@ -1,5 +1,5 @@
 #
 #
-# Makefile generated by fpcmake v0.99.15 [2000/05/26]
+# Makefile generated by fpcmake v0.99.15 [2000/06/03]
 #
 #
 
 
 defaultrule: all
 defaultrule: all
@@ -205,6 +205,7 @@ endif
 # Targets
 # Targets
 
 
 override UNITOBJECTS+=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS)
 override UNITOBJECTS+=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS)
+override RSTOBJECTS+=ssockets cachecls
 
 
 # Clean
 # Clean
 
 
@@ -702,26 +703,18 @@ ifneq ($(OS_TARGET),$(OS_SOURCE))
 override FPCOPT+=-T$(OS_TARGET)
 override FPCOPT+=-T$(OS_TARGET)
 endif
 endif
 
 
-ifdef NEEDOPT
-override FPCOPT+=$(NEEDOPT)
-endif
-
-ifdef NEEDUNITDIR
-override FPCOPT+=$(addprefix -Fu,$(NEEDUNITDIR))
+# User dirs should be first, so they are looked at first
+ifdef UNITDIR
+override FPCOPT+=$(addprefix -Fu,$(UNITDIR))
 endif
 endif
-
-ifdef UNITSDIR
-override FPCOPT+=-Fu$(UNITSDIR)
+ifdef LIBDIR
+override FPCOPT+=$(addprefix -Fl,$(LIBDIR))
 endif
 endif
-
-ifdef NEEDINCDIR
-override FPCOPT+=$(addprefix -Fi,$(NEEDINCDIR))
+ifdef OBJDIR
+override FPCOPT+=$(addprefix -Fo,$(OBJDIR))
 endif
 endif
-
-
-# Target dirs
-ifdef TARGETDIR
-override FPCOPT+=-FE$(TARGETDIR)
+ifdef INCDIR
+override FPCOPT+=$(addprefix -Fi,$(INCDIR))
 endif
 endif
 
 
 # Smartlinking
 # Smartlinking
@@ -764,21 +757,31 @@ ifdef VERBOSE
 override FPCOPT+=-vwni
 override FPCOPT+=-vwni
 endif
 endif
 
 
-# Add commandline options
-ifdef OPT
-override FPCOPT+=$(OPT)
+ifdef NEEDOPT
+override FPCOPT+=$(NEEDOPT)
 endif
 endif
-ifdef UNITDIR
-override FPCOPT+=$(addprefix -Fu,$(UNITDIR))
+
+ifdef NEEDUNITDIR
+override FPCOPT+=$(addprefix -Fu,$(NEEDUNITDIR))
 endif
 endif
-ifdef LIBDIR
-override FPCOPT+=$(addprefix -Fl,$(LIBDIR))
+
+ifdef UNITSDIR
+override FPCOPT+=-Fu$(UNITSDIR)
 endif
 endif
-ifdef OBJDIR
-override FPCOPT+=$(addprefix -Fo,$(OBJDIR))
+
+ifdef NEEDINCDIR
+override FPCOPT+=$(addprefix -Fi,$(NEEDINCDIR))
 endif
 endif
-ifdef INCDIR
-override FPCOPT+=$(addprefix -Fi,$(INCDIR))
+
+
+# Target dirs
+ifdef TARGETDIR
+override FPCOPT+=-FE$(TARGETDIR)
+endif
+
+# Add commandline options last so they can override
+ifdef OPT
+override FPCOPT+=$(OPT)
 endif
 endif
 
 
 # Add defines from FPCOPTDEF to FPCOPT
 # Add defines from FPCOPTDEF to FPCOPT
@@ -859,6 +862,16 @@ override CLEANPPUFILES+=$(UNITPPUFILES)
 
 
 fpc_units: $(UNITPPUFILES)
 fpc_units: $(UNITPPUFILES)
 
 
+#####################################################################
+# Resource strings
+#####################################################################
+
+ifdef RSTOBJECTS
+override RSTFILES=$(addsuffix $(RSTEXT),$(RSTOBJECTS))
+
+override CLEANRSTFILES+=$(RSTFILES)
+endif
+
 #####################################################################
 #####################################################################
 # General compile rules
 # General compile rules
 #####################################################################
 #####################################################################
@@ -901,6 +914,12 @@ fpc_debug:
 
 
 .PHONY: fpc_smart fpc_shared
 .PHONY: fpc_smart fpc_shared
 
 
+ifdef LIBVERSION
+LIBFULLNAME=$(LIBNAME).$(LIBVERSION)
+else
+LIBFULLNAME=$(LIBNAME)
+endif
+
 # Default sharedlib units are all unit objects
 # Default sharedlib units are all unit objects
 ifndef SHAREDLIBUNITOBJECTS
 ifndef SHAREDLIBUNITOBJECTS
 SHAREDLIBUNITOBJECTS:=$(UNITOBJECTS)
 SHAREDLIBUNITOBJECTS:=$(UNITOBJECTS)
@@ -914,7 +933,7 @@ ifdef inlinux
 ifndef LIBNAME
 ifndef LIBNAME
 	@$(ECHO) "LIBNAME not set"
 	@$(ECHO) "LIBNAME not set"
 else
 else
-	$(PPUMOVE) $(SHAREDLIBUNITOBJECTS) -o$(LIBNAME)
+	$(PPUMOVE) $(SHAREDLIBUNITOBJECTS) -o$(LIBFULLNAME)
 endif
 endif
 else
 else
 	@$(ECHO) "Shared Libraries not supported"
 	@$(ECHO) "Shared Libraries not supported"
@@ -932,14 +951,7 @@ endif
 
 
 ifdef INSTALLPPUFILES
 ifdef INSTALLPPUFILES
 ifdef PPUFILES
 ifdef PPUFILES
-ifdef inlinux
 INSTALLPPULINKFILES:=$(shell $(PPUFILES) -S -O $(INSTALLPPUFILES))
 INSTALLPPULINKFILES:=$(shell $(PPUFILES) -S -O $(INSTALLPPUFILES))
-ifdef LIBNAME
-INSTALLPPULIBFILES=$(LIBNAME)
-endif
-else
-INSTALLPPULINKFILES:=$(shell $(PPUFILES) $(INSTALLPPUFILES))
-endif
 else
 else
 INSTALLPPULINKFILES:=$(wildcard $(subst $(PPUEXT),$(OEXT),$(INSTALLPPUFILES)))
 INSTALLPPULINKFILES:=$(wildcard $(subst $(PPUEXT),$(OEXT),$(INSTALLPPUFILES)))
 endif
 endif
@@ -954,8 +966,11 @@ ifdef INSTALLPPUFILES
 ifneq ($(INSTALLPPULINKFILES),)
 ifneq ($(INSTALLPPULINKFILES),)
 	@$(ECHO) -e $(addprefix "\n"$(UNITINSTALLDIR)/,$(INSTALLPPULINKFILES))
 	@$(ECHO) -e $(addprefix "\n"$(UNITINSTALLDIR)/,$(INSTALLPPULINKFILES))
 endif
 endif
-ifneq ($(INSTALLPPULIBFILES),)
-	@$(ECHO) -e $(addprefix "\n"$(LIBINSTALLDIR)/,$(INSTALLPPULIBFILES))
+ifneq ($(wildcard $(LIBFULLNAME)),)
+	@$(ECHO) $(LIBINSTALLDIR)/$(LIBFULLNAME)
+ifdef inlinux
+	@$(ECHO) $(LIBINSTALLDIR)/$(LIBNAME)
+endif
 endif
 endif
 endif
 endif
 ifdef EXTRAINSTALLFILES
 ifdef EXTRAINSTALLFILES
@@ -978,9 +993,12 @@ ifdef INSTALLPPUFILES
 ifneq ($(INSTALLPPULINKFILES),)
 ifneq ($(INSTALLPPULINKFILES),)
 	$(INSTALL) $(INSTALLPPULINKFILES) $(UNITINSTALLDIR)
 	$(INSTALL) $(INSTALLPPULINKFILES) $(UNITINSTALLDIR)
 endif
 endif
-ifneq ($(INSTALLPPULIBFILES),)
+ifneq ($(wildcard $(LIBFULLNAME)),)
 	$(MKDIR) $(LIBINSTALLDIR)
 	$(MKDIR) $(LIBINSTALLDIR)
-	$(INSTALL) $(INSTALLPPULIBFILES) $(LIBINSTALLDIR)
+	$(INSTALL) $(LIBFULLNAME) $(LIBINSTALLDIR)
+ifdef inlinux
+	ln -sf $(LIBFULLNAME) $(LIBINSTALLDIR)/$(LIBNAME)
+endif
 endif
 endif
 endif
 endif
 ifdef EXTRAINSTALLFILES
 ifdef EXTRAINSTALLFILES
@@ -1098,7 +1116,7 @@ ifdef EXTRACLEANFILES
 	-$(DEL) $(EXTRACLEANFILES)
 	-$(DEL) $(EXTRACLEANFILES)
 endif
 endif
 ifdef LIBNAME
 ifdef LIBNAME
-	-$(DEL) $(LIBNAME)
+	-$(DEL) $(LIBNAME) $(LIBFULLNAME)
 endif
 endif
 	-$(DEL) $(FPCMADE) $(PPAS) link.res $(FPCEXTFILE) $(REDIRFILE)
 	-$(DEL) $(FPCMADE) $(PPAS) link.res $(FPCEXTFILE) $(REDIRFILE)
 
 

+ 1 - 0
fcl/go32v2/Makefile.fpc

@@ -4,6 +4,7 @@
 
 
 [targets]
 [targets]
 units=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS)
 units=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS)
+rst=ssockets cachecls
 
 
 [defaults]
 [defaults]
 defaulttarget=go32v2
 defaulttarget=go32v2

+ 9 - 2
fcl/inc/classes.inc

@@ -16,6 +16,10 @@
  *       Class implementations are in separate files.                 *
  *       Class implementations are in separate files.                 *
  **********************************************************************}
  **********************************************************************}
 
 
+var
+  ClassList : TThreadlist;
+  ClassAliasList : TStringList;
+
 {
 {
  Include all message strings
  Include all message strings
 
 
@@ -543,7 +547,7 @@ begin
           CurFixup := TPropFixup(Items[i]);
           CurFixup := TPropFixup(Items[i]);
           if ((not Assigned(Root)) or (CurFixup.FInstanceRoot = Root)) and
           if ((not Assigned(Root)) or (CurFixup.FInstanceRoot = Root)) and
             ((Length(RootName) = 0) or
             ((Length(RootName) = 0) or
-	    (UpperCase(RootName) = UpperCase(CurFixup.FRootName))) then
+            (UpperCase(RootName) = UpperCase(CurFixup.FRootName))) then
           begin
           begin
             Delete(i);
             Delete(i);
             CurFixup.Free;
             CurFixup.Free;
@@ -1194,7 +1198,10 @@ end;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.17  2000-06-29 16:29:23  sg
+  Revision 1.18  2000-07-01 09:49:02  peter
+    * fixed go32v2,win32 build
+
+  Revision 1.17  2000/06/29 16:29:23  sg
   * Implemented streaming. Note: The writer driver interface is stable, but
   * Implemented streaming. Note: The writer driver interface is stable, but
     the reader interface is not final yet!
     the reader interface is not final yet!
 
 

+ 4 - 4
fcl/linux/classes.pp

@@ -34,9 +34,6 @@ implementation
 uses
 uses
   linux;
   linux;
 
 
-var
-ClassList : TThreadlist;
-ClassAliasList : TStringList;
 { OS - independent class implementations are in /inc directory. }
 { OS - independent class implementations are in /inc directory. }
 {$i classes.inc}
 {$i classes.inc}
 
 
@@ -53,7 +50,10 @@ finalization
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.18  2000-06-29 16:32:06  sg
+  Revision 1.19  2000-07-01 09:49:02  peter
+    * fixed go32v2,win32 build
+
+  Revision 1.18  2000/06/29 16:32:06  sg
   * Changes in initialisation/finalisation for streaming support
   * Changes in initialisation/finalisation for streaming support
 
 
   Revision 1.17  2000/06/27 17:17:34  lazarus
   Revision 1.17  2000/06/27 17:17:34  lazarus

+ 2 - 2
fcl/tests/testcgi.pp

@@ -102,8 +102,8 @@ end;
 begin
 begin
    try
    try
       cgiStuff := TCGIData.Create;
       cgiStuff := TCGIData.Create;
-      cgiStuff.FName := 'Michael A. Hess';    // replace with your name
-      cgiStuff.FEmail := '[email protected]';// replace with your email
+      cgiStuff.Name := 'Michael A. Hess';    // replace with your name
+      cgiStuff.Email := '[email protected]';// replace with your email
       cgiStuff.Run;
       cgiStuff.Run;
    finally
    finally
       cgiStuff.Free;
       cgiStuff.Free;

+ 60 - 42
fcl/win32/Makefile

@@ -1,5 +1,5 @@
 #
 #
-# Makefile generated by fpcmake v0.99.15 [2000/05/26]
+# Makefile generated by fpcmake v0.99.15 [2000/06/03]
 #
 #
 
 
 defaultrule: all
 defaultrule: all
@@ -205,6 +205,7 @@ endif
 # Targets
 # Targets
 
 
 override UNITOBJECTS+=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS) process fileinfo
 override UNITOBJECTS+=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS) process fileinfo
+override RSTOBJECTS+=ssockets cachecls
 
 
 # Clean
 # Clean
 
 
@@ -702,26 +703,18 @@ ifneq ($(OS_TARGET),$(OS_SOURCE))
 override FPCOPT+=-T$(OS_TARGET)
 override FPCOPT+=-T$(OS_TARGET)
 endif
 endif
 
 
-ifdef NEEDOPT
-override FPCOPT+=$(NEEDOPT)
-endif
-
-ifdef NEEDUNITDIR
-override FPCOPT+=$(addprefix -Fu,$(NEEDUNITDIR))
+# User dirs should be first, so they are looked at first
+ifdef UNITDIR
+override FPCOPT+=$(addprefix -Fu,$(UNITDIR))
 endif
 endif
-
-ifdef UNITSDIR
-override FPCOPT+=-Fu$(UNITSDIR)
+ifdef LIBDIR
+override FPCOPT+=$(addprefix -Fl,$(LIBDIR))
 endif
 endif
-
-ifdef NEEDINCDIR
-override FPCOPT+=$(addprefix -Fi,$(NEEDINCDIR))
+ifdef OBJDIR
+override FPCOPT+=$(addprefix -Fo,$(OBJDIR))
 endif
 endif
-
-
-# Target dirs
-ifdef TARGETDIR
-override FPCOPT+=-FE$(TARGETDIR)
+ifdef INCDIR
+override FPCOPT+=$(addprefix -Fi,$(INCDIR))
 endif
 endif
 
 
 # Smartlinking
 # Smartlinking
@@ -764,21 +757,31 @@ ifdef VERBOSE
 override FPCOPT+=-vwni
 override FPCOPT+=-vwni
 endif
 endif
 
 
-# Add commandline options
-ifdef OPT
-override FPCOPT+=$(OPT)
+ifdef NEEDOPT
+override FPCOPT+=$(NEEDOPT)
 endif
 endif
-ifdef UNITDIR
-override FPCOPT+=$(addprefix -Fu,$(UNITDIR))
+
+ifdef NEEDUNITDIR
+override FPCOPT+=$(addprefix -Fu,$(NEEDUNITDIR))
 endif
 endif
-ifdef LIBDIR
-override FPCOPT+=$(addprefix -Fl,$(LIBDIR))
+
+ifdef UNITSDIR
+override FPCOPT+=-Fu$(UNITSDIR)
 endif
 endif
-ifdef OBJDIR
-override FPCOPT+=$(addprefix -Fo,$(OBJDIR))
+
+ifdef NEEDINCDIR
+override FPCOPT+=$(addprefix -Fi,$(NEEDINCDIR))
 endif
 endif
-ifdef INCDIR
-override FPCOPT+=$(addprefix -Fi,$(INCDIR))
+
+
+# Target dirs
+ifdef TARGETDIR
+override FPCOPT+=-FE$(TARGETDIR)
+endif
+
+# Add commandline options last so they can override
+ifdef OPT
+override FPCOPT+=$(OPT)
 endif
 endif
 
 
 # Add defines from FPCOPTDEF to FPCOPT
 # Add defines from FPCOPTDEF to FPCOPT
@@ -859,6 +862,16 @@ override CLEANPPUFILES+=$(UNITPPUFILES)
 
 
 fpc_units: $(UNITPPUFILES)
 fpc_units: $(UNITPPUFILES)
 
 
+#####################################################################
+# Resource strings
+#####################################################################
+
+ifdef RSTOBJECTS
+override RSTFILES=$(addsuffix $(RSTEXT),$(RSTOBJECTS))
+
+override CLEANRSTFILES+=$(RSTFILES)
+endif
+
 #####################################################################
 #####################################################################
 # General compile rules
 # General compile rules
 #####################################################################
 #####################################################################
@@ -901,6 +914,12 @@ fpc_debug:
 
 
 .PHONY: fpc_smart fpc_shared
 .PHONY: fpc_smart fpc_shared
 
 
+ifdef LIBVERSION
+LIBFULLNAME=$(LIBNAME).$(LIBVERSION)
+else
+LIBFULLNAME=$(LIBNAME)
+endif
+
 # Default sharedlib units are all unit objects
 # Default sharedlib units are all unit objects
 ifndef SHAREDLIBUNITOBJECTS
 ifndef SHAREDLIBUNITOBJECTS
 SHAREDLIBUNITOBJECTS:=$(UNITOBJECTS)
 SHAREDLIBUNITOBJECTS:=$(UNITOBJECTS)
@@ -914,7 +933,7 @@ ifdef inlinux
 ifndef LIBNAME
 ifndef LIBNAME
 	@$(ECHO) "LIBNAME not set"
 	@$(ECHO) "LIBNAME not set"
 else
 else
-	$(PPUMOVE) $(SHAREDLIBUNITOBJECTS) -o$(LIBNAME)
+	$(PPUMOVE) $(SHAREDLIBUNITOBJECTS) -o$(LIBFULLNAME)
 endif
 endif
 else
 else
 	@$(ECHO) "Shared Libraries not supported"
 	@$(ECHO) "Shared Libraries not supported"
@@ -932,14 +951,7 @@ endif
 
 
 ifdef INSTALLPPUFILES
 ifdef INSTALLPPUFILES
 ifdef PPUFILES
 ifdef PPUFILES
-ifdef inlinux
 INSTALLPPULINKFILES:=$(shell $(PPUFILES) -S -O $(INSTALLPPUFILES))
 INSTALLPPULINKFILES:=$(shell $(PPUFILES) -S -O $(INSTALLPPUFILES))
-ifdef LIBNAME
-INSTALLPPULIBFILES=$(LIBNAME)
-endif
-else
-INSTALLPPULINKFILES:=$(shell $(PPUFILES) $(INSTALLPPUFILES))
-endif
 else
 else
 INSTALLPPULINKFILES:=$(wildcard $(subst $(PPUEXT),$(OEXT),$(INSTALLPPUFILES)))
 INSTALLPPULINKFILES:=$(wildcard $(subst $(PPUEXT),$(OEXT),$(INSTALLPPUFILES)))
 endif
 endif
@@ -954,8 +966,11 @@ ifdef INSTALLPPUFILES
 ifneq ($(INSTALLPPULINKFILES),)
 ifneq ($(INSTALLPPULINKFILES),)
 	@$(ECHO) -e $(addprefix "\n"$(UNITINSTALLDIR)/,$(INSTALLPPULINKFILES))
 	@$(ECHO) -e $(addprefix "\n"$(UNITINSTALLDIR)/,$(INSTALLPPULINKFILES))
 endif
 endif
-ifneq ($(INSTALLPPULIBFILES),)
-	@$(ECHO) -e $(addprefix "\n"$(LIBINSTALLDIR)/,$(INSTALLPPULIBFILES))
+ifneq ($(wildcard $(LIBFULLNAME)),)
+	@$(ECHO) $(LIBINSTALLDIR)/$(LIBFULLNAME)
+ifdef inlinux
+	@$(ECHO) $(LIBINSTALLDIR)/$(LIBNAME)
+endif
 endif
 endif
 endif
 endif
 ifdef EXTRAINSTALLFILES
 ifdef EXTRAINSTALLFILES
@@ -978,9 +993,12 @@ ifdef INSTALLPPUFILES
 ifneq ($(INSTALLPPULINKFILES),)
 ifneq ($(INSTALLPPULINKFILES),)
 	$(INSTALL) $(INSTALLPPULINKFILES) $(UNITINSTALLDIR)
 	$(INSTALL) $(INSTALLPPULINKFILES) $(UNITINSTALLDIR)
 endif
 endif
-ifneq ($(INSTALLPPULIBFILES),)
+ifneq ($(wildcard $(LIBFULLNAME)),)
 	$(MKDIR) $(LIBINSTALLDIR)
 	$(MKDIR) $(LIBINSTALLDIR)
-	$(INSTALL) $(INSTALLPPULIBFILES) $(LIBINSTALLDIR)
+	$(INSTALL) $(LIBFULLNAME) $(LIBINSTALLDIR)
+ifdef inlinux
+	ln -sf $(LIBFULLNAME) $(LIBINSTALLDIR)/$(LIBNAME)
+endif
 endif
 endif
 endif
 endif
 ifdef EXTRAINSTALLFILES
 ifdef EXTRAINSTALLFILES
@@ -1098,7 +1116,7 @@ ifdef EXTRACLEANFILES
 	-$(DEL) $(EXTRACLEANFILES)
 	-$(DEL) $(EXTRACLEANFILES)
 endif
 endif
 ifdef LIBNAME
 ifdef LIBNAME
-	-$(DEL) $(LIBNAME)
+	-$(DEL) $(LIBNAME) $(LIBFULLNAME)
 endif
 endif
 	-$(DEL) $(FPCMADE) $(PPAS) link.res $(FPCEXTFILE) $(REDIRFILE)
 	-$(DEL) $(FPCMADE) $(PPAS) link.res $(FPCEXTFILE) $(REDIRFILE)
 
 

+ 1 - 0
fcl/win32/Makefile.fpc

@@ -4,6 +4,7 @@
 
 
 [targets]
 [targets]
 units=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS) process fileinfo
 units=classes $(INCUNITS) $(XMLUNITS) $(SHEDITUNITS) process fileinfo
+rst=ssockets cachecls
 
 
 [defaults]
 [defaults]
 defaulttarget=win32
 defaulttarget=win32