2
0
Эх сурвалжийг харах

* Linux part of termio unit

marco 22 жил өмнө
parent
commit
c97a5d06eb

+ 1 - 1
rtl/linux/Makefile.fpc

@@ -7,7 +7,7 @@ main=rtl
 
 [target]
 loaders=prt0 dllprt0 cprt0 gprt0 cprt21 gprt21
-units=$(SYSTEMUNIT) baseunix strings systhrds objpas syscall unixutil \
+units=$(SYSTEMUNIT) baseunix strings systhrds termio objpas syscall unixutil \
       heaptrc lineinfo \
       $(LINUXUNIT1) unix $(LINUXUNIT2) initc $(CPU_UNITS) \
       dos crt objects printer ggigraph \

+ 2 - 2
rtl/linux/termios.inc

@@ -81,7 +81,7 @@ Type
     ws_ypixel : word;
   end;
   TWinSize=winsize;
-
+{
   Termio = packed record
     c_iflag,                             { input mode flags }
     c_oflag,                             { output mode flags }
@@ -91,7 +91,7 @@ Type
     c_cc     : array [0..NCC-1] of char;{ control characters }
   end;
   TTermio=Termio;
-
+}
 {$PACKRECORDS C}
   Termios = record
     c_iflag,

+ 5 - 2
rtl/unix/ggigraph.pp

@@ -88,7 +88,7 @@ Const
 implementation
 
 uses
-  Unix;
+  termio;
 
 var
   OldIO : TermIos;
@@ -537,7 +537,10 @@ finalization
 end.
 {
   $Log$
-  Revision 1.6  2002-09-07 16:01:27  peter
+  Revision 1.7  2003-11-19 17:35:36  marco
+   * Linux part of termio unit
+
+  Revision 1.6  2002/09/07 16:01:27  peter
     * old logs removed and tabs fixed
 
 }

+ 5 - 2
rtl/unix/graph.pp

@@ -85,7 +85,7 @@ Const
 implementation
 
 uses
-  Unix,x86;
+  termio,x86;
 
 const
   InternalDriverName = 'LinuxVGA';
@@ -601,7 +601,10 @@ initialization
 end.
 {
   $Log$
-  Revision 1.8  2003-09-14 20:15:01  marco
+  Revision 1.9  2003-11-19 17:35:36  marco
+   * Linux part of termio unit
+
+  Revision 1.8  2003/09/14 20:15:01  marco
    * Unix reform stage two. Remove all calls from Unix that exist in Baseunix.
 
   Revision 1.7  2002/09/07 16:01:27  peter