mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 04:59:26 +02:00
* varutils,variants,dynlibs units are built now for wince.
* added readme.txt git-svn-id: trunk@1316 -
This commit is contained in:
yury
parent
15893c0a05
commit
771743a61c
3
.gitattributes
vendored
3
.gitattributes
vendored
@ -4303,12 +4303,15 @@ rtl/wince/Makefile.fpc svneol=native#text/plain
|
||||
rtl/wince/arm/wprt0.as svneol=native#text/plain
|
||||
rtl/wince/classes.pp -text
|
||||
rtl/wince/dos.pp -text
|
||||
rtl/wince/dynlibs.inc -text
|
||||
rtl/wince/i386/wprt0.as svneol=native#text/plain
|
||||
rtl/wince/messages.pp -text
|
||||
rtl/wince/readme-winceapi-port -text
|
||||
rtl/wince/readme.txt -text
|
||||
rtl/wince/system.pp svneol=native#text/plain
|
||||
rtl/wince/sysutils.pp -text
|
||||
rtl/wince/tthread.inc -text
|
||||
rtl/wince/varutils.pp -text
|
||||
rtl/wince/windows.pp -text
|
||||
rtl/wince/wininc/aygshell.inc -text
|
||||
rtl/wince/wininc/base.inc -text
|
||||
|
||||
@ -249,115 +249,115 @@ GRAPHDIR=$(INC)/graph
|
||||
include $(WININC)/makefile.inc
|
||||
WINDOWS_SOURCE_FILES=$(addprefix $(WININC)/,$(addsuffix .inc,$(WINDOWS_FILES)))
|
||||
ifeq ($(FULL_TARGET),i386-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-go32v2)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-win32)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-os2)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-freebsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-beos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-solaris)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-qnx)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netware)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-openbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wdosx)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-emx)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-watcom)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-netwlibc)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-wince)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-freebsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-amiga)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-atari)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-openbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),m68k-palmos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-macos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-darwin)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc-morphos)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-netbsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),sparc-solaris)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-freebsd)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),x86_64-win64)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),arm-wince)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),powerpc64-linux)
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils matrix ucomplex charset getopts
|
||||
override TARGET_UNITS+=$(SYSTEMUNIT) ctypes objpas macpas strings lineinfo heaptrc windows messages dynlibs dos objects rtlconsts sysconst sysutils typinfo types classes strutils convutils math dateutils varutils variants matrix ucomplex charset getopts
|
||||
endif
|
||||
ifeq ($(FULL_TARGET),i386-linux)
|
||||
override TARGET_LOADERS+=wprt0 #wdllprt0
|
||||
@ -1929,6 +1929,11 @@ typinfo$(PPUEXT): $(OBJPASDIR)/typinfo.pp objpas$(PPUEXT)
|
||||
$(COMPILER) -Sg $(OBJPASDIR)/typinfo.pp
|
||||
math$(PPUEXT): $(OBJPASDIR)/math.pp objpas$(PPUEXT) sysutils$(PPUEXT)
|
||||
$(COMPILER) $(OBJPASDIR)/math.pp
|
||||
varutils$(PPUEXT) : $(OBJPASDIR)/cvarutil.inc $(OBJPASDIR)/varutils.inc \
|
||||
$(OBJPASDIR)/varutilh.inc varutils.pp sysutils$(PPUEXT)
|
||||
$(COMPILER) -Fi$(OBJPASDIR) varutils.pp
|
||||
variants$(PPUEXT) : $(INC)/variants.pp varutils$(PPUEXT) sysutils$(PPUEXT) sysconst$(PPUEXT) typinfo$(PPUEXT) rtlconsts$(PPUEXT)
|
||||
$(COMPILER) -Fi$(INC) $(INC)/variants.pp
|
||||
types$(PPUEXT) : $(OBJPASDIR)/types.pp objpas$(PPUEXT) $(SYSTEMUNIT)$(PPUEXT)
|
||||
$(COMPILER) $(OBJPASDIR)/types.pp
|
||||
rtlconsts$(PPUEXT) : objpas$(PPUEXT) $(OBJPASDIR)/rtlconsts.pp
|
||||
|
||||
@ -9,19 +9,20 @@ main=rtl
|
||||
loaders= wprt0 #wdllprt0
|
||||
units=$(SYSTEMUNIT) ctypes objpas macpas strings \
|
||||
lineinfo heaptrc \
|
||||
windows messages \
|
||||
# winsock initc cmem dynlibs signals \
|
||||
windows messages dynlibs \
|
||||
dos objects \
|
||||
# crt graph \
|
||||
rtlconsts sysconst sysutils \
|
||||
typinfo types classes \
|
||||
strutils convutils math dateutils \
|
||||
# varutils variants \
|
||||
varutils variants \
|
||||
matrix ucomplex \
|
||||
charset getopts
|
||||
# wincrt winmouse winevent sockets printer \
|
||||
# video mouse keyboard \
|
||||
# winsysut fpmkunit
|
||||
|
||||
# winsock initc cmem signals \
|
||||
# crt graph \
|
||||
# wincrt winmouse winevent sockets printer \
|
||||
# video mouse keyboard \
|
||||
# winsysut fpmkunit
|
||||
|
||||
# rsts=math varutils typinfo variants classes dateutils sysconst fpmkunit
|
||||
|
||||
@ -179,12 +180,12 @@ typinfo$(PPUEXT): $(OBJPASDIR)/typinfo.pp objpas$(PPUEXT)
|
||||
math$(PPUEXT): $(OBJPASDIR)/math.pp objpas$(PPUEXT) sysutils$(PPUEXT)
|
||||
$(COMPILER) $(OBJPASDIR)/math.pp
|
||||
|
||||
#varutils$(PPUEXT) : $(OBJPASDIR)/cvarutil.inc $(OBJPASDIR)/varutils.inc \
|
||||
# $(OBJPASDIR)/varutilh.inc varutils.pp sysutils$(PPUEXT)
|
||||
# $(COMPILER) -Fi$(OBJPASDIR) varutils.pp
|
||||
varutils$(PPUEXT) : $(OBJPASDIR)/cvarutil.inc $(OBJPASDIR)/varutils.inc \
|
||||
$(OBJPASDIR)/varutilh.inc varutils.pp sysutils$(PPUEXT)
|
||||
$(COMPILER) -Fi$(OBJPASDIR) varutils.pp
|
||||
|
||||
#variants$(PPUEXT) : $(INC)/variants.pp varutils$(PPUEXT) sysutils$(PPUEXT) sysconst$(PPUEXT) typinfo$(PPUEXT) rtlconsts$(PPUEXT)
|
||||
# $(COMPILER) -Fi$(INC) $(INC)/variants.pp
|
||||
variants$(PPUEXT) : $(INC)/variants.pp varutils$(PPUEXT) sysutils$(PPUEXT) sysconst$(PPUEXT) typinfo$(PPUEXT) rtlconsts$(PPUEXT)
|
||||
$(COMPILER) -Fi$(INC) $(INC)/variants.pp
|
||||
|
||||
types$(PPUEXT) : $(OBJPASDIR)/types.pp objpas$(PPUEXT) $(SYSTEMUNIT)$(PPUEXT)
|
||||
$(COMPILER) $(OBJPASDIR)/types.pp
|
||||
@ -241,5 +242,3 @@ fpmkunit$(PPUEXT) : $(COMMON)/fpmkunit.pp classes$(PPUEXT)
|
||||
#callspec$(PPUEXT) : $(INC)/callspec.pp $(SYSTEMUNIT)$(PPUEXT)
|
||||
|
||||
ctypes$(PPUEXT) : $(INC)/ctypes.pp $(SYSTEMUNIT)$(PPUEXT)
|
||||
|
||||
#variants$(PPUEXT) : $(INC)/variants.pp varutils$(PPUEXT) typinfo$(PPUEXT)
|
||||
|
||||
60
rtl/wince/dynlibs.inc
Normal file
60
rtl/wince/dynlibs.inc
Normal file
@ -0,0 +1,60 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 1999-2000 by the Free Pascal development team
|
||||
|
||||
Implements OS dependent part for loading of dynamic libraries.
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
|
||||
{$ifdef readinterface}
|
||||
|
||||
{ ---------------------------------------------------------------------
|
||||
Interface declarations
|
||||
---------------------------------------------------------------------}
|
||||
|
||||
Type
|
||||
TLibHandle = Longint;
|
||||
|
||||
Const
|
||||
NilHandle = 0;
|
||||
|
||||
{$else}
|
||||
|
||||
{ ---------------------------------------------------------------------
|
||||
Implementation section
|
||||
---------------------------------------------------------------------}
|
||||
|
||||
Uses windows;
|
||||
|
||||
Function LoadLibrary(Name : AnsiString) : TlibHandle;
|
||||
var
|
||||
ws: PWideChar;
|
||||
begin
|
||||
ws:=StringToPWideChar(Name);
|
||||
Result:=Windows.LoadLibrary(ws);
|
||||
FreeMem(ws);
|
||||
end;
|
||||
|
||||
Function GetProcedureAddress(Lib : TLibHandle; ProcName : AnsiString) : Pointer;
|
||||
var
|
||||
ws: PWideChar;
|
||||
begin
|
||||
ws:=StringToPWideChar(ProcName);
|
||||
Result:=Windows.GetProcAddress(Lib, ws);
|
||||
FreeMem(ws);
|
||||
end;
|
||||
|
||||
Function UnloadLibrary(Lib : TLibHandle) : Boolean;
|
||||
begin
|
||||
Result:=Windows.FreeLibrary(Lib);
|
||||
end;
|
||||
|
||||
{$endif}
|
||||
43
rtl/wince/readme.txt
Normal file
43
rtl/wince/readme.txt
Normal file
@ -0,0 +1,43 @@
|
||||
WinCE port
|
||||
==========
|
||||
|
||||
The WinCE port is quite complete and usable. The port was started and maintained by Yury Sidorov. Oliver (Oro06) ported WinCE API headers.
|
||||
|
||||
Status
|
||||
------
|
||||
* The 2.1.x compiler has compiler support WinCE.
|
||||
* ARM and i386 (old WinCE emulator) CPUs are supported.
|
||||
* Base units are complete.
|
||||
* Windows unit is almost complete. Delphi compatible declarations is not ready.
|
||||
|
||||
Building
|
||||
--------
|
||||
* You need cross binutils for arm-wince, get them fromftp://ftp.freepascal.org/pub/fpc/contrib/cross/arm-wince-binutils.zip for Win32.
|
||||
* Extract them to some dir in the path on your machine.
|
||||
* Get the 2.1 source repository from SVN: http://www.freepascal.org/develop.html#svn
|
||||
* Go to fpc/compiler and execute make cycle CPU_TARGET=arm OS_TARGET=wince
|
||||
|
||||
You should end with the units compiled to fpc/rtl/units/arm-wince and a ppccrossarm.exe in fpc/compiler. Copy them to locations fitting your fpc installation.
|
||||
|
||||
WinCE port notes
|
||||
----------------
|
||||
* chdir always produces an error (WinCE does not support setting of current directory).
|
||||
* All file/dir paths must be absolute (started with \).
|
||||
* WinCE is unicode OS. All string parameters to API calls must be PWideChar.
|
||||
* WinCE does not have support for environment strings.
|
||||
* WinCE does not have support for console applications by default. But you can install console support by yourself. Please note that FPC creates GUI applications for WinCE target by default. To create console application you should use -WC compiler switch or put {$APPTYPE CONSOLE} directive to source code.<br>To enable console in WinCE install one of the following programs:
|
||||
|
||||
- PocketCMD by SymbolicTools. It is recommended solution. Get it here: http://www.symbolictools.de/public/pocketconsole/applications/PocketCMD
|
||||
|
||||
- PPC Command Shell from Microsoft Windows Mobile Developer Power Toys. Get it here: http://www.microsoft.com/downloads/details.aspx?FamilyID=74473fd6-1dcc-47aa-ab28-6a2b006edfe9&displaylang=en
|
||||
|
||||
PPC Command Shell have less features than PocketCMD. Also it have some issues. One of them - a new console window is opened even if an application is started from a console command prompt.
|
||||
|
||||
Links
|
||||
-----
|
||||
* WinCE Port page at Free Pascal Wiki: http://www.freepascal.org/wiki/index.php/WinCE_port
|
||||
* Useful WinCE info: http://www.rainer-keuchel.de/documents.html
|
||||
|
||||
Contacts
|
||||
--------
|
||||
Write any questions regarding WinCE port to Yury Sidorov yury_sidorov@mail.ru
|
||||
@ -76,6 +76,7 @@ const
|
||||
function AnsiToWideBuf(AnsiBuf: PChar; AnsiBufLen: longint; WideBuf: PWideChar; WideBufLen: longint): longint;
|
||||
function WideToAnsiBuf(WideBuf: PWideChar; WideBufLen: longint; AnsiBuf: PChar; AnsiBufLen: longint): longint;
|
||||
function PCharToPWideChar(str: PChar; strlen: longint = -1; outlen: PLongInt = nil): PWideChar;
|
||||
function StringToPWideChar(const s: AnsiString; outlen: PLongInt = nil): PWideChar;
|
||||
|
||||
{ Wrappers for some WinAPI calls }
|
||||
function CreateEvent(lpEventAttributes:pointer;bManualReset:longbool;bInitialState:longbool;lpName:pchar): THandle; stdcall;
|
||||
@ -333,6 +334,32 @@ begin
|
||||
outlen^:=(len - 1)*SizeOf(WideChar);
|
||||
end;
|
||||
|
||||
function StringToPWideChar(const s: AnsiString; outlen: PLongInt = nil): PWideChar;
|
||||
var
|
||||
len, wlen: longint;
|
||||
begin
|
||||
len:=Length(s);
|
||||
wlen:=(len + 1)*SizeOf(WideChar);
|
||||
GetMem(Result, wlen);
|
||||
wlen:=AnsiToWideBuf(PChar(s), len, Result, wlen);
|
||||
if wlen = 0 then
|
||||
begin
|
||||
wlen:=AnsiToWideBuf(PChar(s), len, nil, 0);
|
||||
if wlen > 0 then
|
||||
begin
|
||||
ReAllocMem(Result, wlen);
|
||||
wlen:=AnsiToWideBuf(PChar(s), len, Result, wlen);
|
||||
end
|
||||
else
|
||||
begin
|
||||
Result^:=#0;
|
||||
wlen:=SizeOf(WideChar);
|
||||
end;
|
||||
end;
|
||||
if outlen <> nil then
|
||||
outlen^:=(wlen - 1) div SizeOf(WideChar);
|
||||
end;
|
||||
|
||||
{*****************************************************************************
|
||||
WinAPI wrappers implementation
|
||||
*****************************************************************************}
|
||||
|
||||
@ -58,32 +58,6 @@ implementation
|
||||
{ Include platform independent implementation part }
|
||||
{$i sysutils.inc}
|
||||
|
||||
function StringToPWideChar(const s: string; outlen: PLongInt = nil): PWideChar;
|
||||
var
|
||||
len, wlen: longint;
|
||||
begin
|
||||
len:=Length(s);
|
||||
wlen:=(len + 1)*SizeOf(WideChar);
|
||||
GetMem(Result, wlen);
|
||||
wlen:=AnsiToWideBuf(PChar(s), len, Result, wlen);
|
||||
if wlen = 0 then
|
||||
begin
|
||||
wlen:=AnsiToWideBuf(PChar(s), len, nil, 0);
|
||||
if wlen > 0 then
|
||||
begin
|
||||
ReAllocMem(Result, wlen);
|
||||
wlen:=AnsiToWideBuf(PChar(s), len, Result, wlen);
|
||||
end
|
||||
else
|
||||
begin
|
||||
Result^:=#0;
|
||||
wlen:=SizeOf(WideChar);
|
||||
end;
|
||||
end;
|
||||
if outlen <> nil then
|
||||
outlen^:=(wlen - 1) div SizeOf(WideChar);
|
||||
end;
|
||||
|
||||
procedure PWideCharToString(const str: PWideChar; var Result: string; strlen: longint = -1);
|
||||
var
|
||||
len: longint;
|
||||
|
||||
38
rtl/wince/varutils.pp
Normal file
38
rtl/wince/varutils.pp
Normal file
@ -0,0 +1,38 @@
|
||||
{
|
||||
This file is part of the Free Pascal run time library.
|
||||
Copyright (c) 1999-2000 by the Free Pascal development team
|
||||
|
||||
Interface and OS-dependent part of variant support
|
||||
|
||||
See the file COPYING.FPC, included in this distribution,
|
||||
for details about the copyright.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
||||
|
||||
**********************************************************************}
|
||||
|
||||
{$MODE ObjFPC}
|
||||
|
||||
Unit varutils;
|
||||
|
||||
Interface
|
||||
|
||||
Uses sysutils;
|
||||
|
||||
// Read definitions.
|
||||
|
||||
{$i varutilh.inc}
|
||||
|
||||
Implementation
|
||||
|
||||
// Code common to all platforms.
|
||||
|
||||
{$i cvarutil.inc}
|
||||
|
||||
// Code common to non-win32 platforms.
|
||||
|
||||
{$i varutils.inc}
|
||||
|
||||
end.
|
||||
Loading…
Reference in New Issue
Block a user