* win16 compilation fix after merge of unicodekvm branch

packages/rtl-console/src/win16/video.pp

@@ -15,6 +15,9 @@
  **********************************************************************}
 unit video;
 
+{$mode objfpc}
+{$modeswitch advancedrecords}
+
 { smart callbacks: on }
 {$K+}