* use $mode directive

rtl/linux/Makefile

@@ -141,12 +141,12 @@ SYSDEPS=$(SYSINCDEPS) $(SYSCPUDEPS)
 SYSTEMPPU=syslinux$(PPUEXT)
 OBJECTS=strings linux \
 	dos crt objects printer \
-	getopts heaptrc errors sockets graph objpas sysutils ports
+	getopts heaptrc errors sockets ports graph objpas sysutils
 
 # Which units may be placed in the shared lib file
 SHAREDLIBFILES=syslinux strings linux objpas sysutils math \
 	dos crt objects printer \
-	getopts errors sockets
+	getopts errors sockets ports
 
 # Extra Syslinux Depends
 ifeq ($(LINK_TO_C),YES)
@@ -284,8 +284,8 @@ printer$(PPUEXT) : printer.pp $(INC)/textrec.inc linux$(PPUEXT) $(SYSTEMPPU)
 graph$(PPUEXT) : graph.pp linux$(PPUEXT) objects$(PPUEXT)
 	$(COMPILER) graph $(REDIR)
 
-ports$(PPUEXT) : ports.pp linux$(PPUEXT)
-	$(COMPILER) -S2 ports $(REDIR)
+ports$(PPUEXT) : ports.pp linux$(PPUEXT) objpas$(PPUEXT)
+	$(COMPILER) ports $(REDIR)
 
 #
 # Other RTL Units
@@ -343,7 +343,10 @@ include $(CFG)/makefile.def
 
 #
 # $Log$
-# Revision 1.10  1998-12-07 16:38:48  michael
+# Revision 1.11  1998-12-11 00:10:50  peter
+#   * use $mode directive
+#
+# Revision 1.10  1998/12/07 16:38:48  michael
 # Added ports unit
 #
 # Revision 1.9  1998/11/24 19:50:49  jonas

rtl/linux/ports.pp

@@ -15,6 +15,8 @@
 
 Unit ports;
 
+{$mode objfpc}
+
 { Implements the 
      port[] portw[] and portl[] 
   constructs using Delphi classes }