1 files changed, 31 insertions, 0 deletions
diff --git a/docview/src/docdump/readnlsdata.pas b/docview/src/docdump/readnlsdata.pas
new file mode 100644
index 00000000..68609235
--- /dev/null
+++ b/docview/src/docdump/readnlsdata.pas
@@ -0,0 +1,31 @@
+unit readnlsdata;
+
+{$mode objfpc}{$H+}
+
+interface
+
+uses
+  Classes, SysUtils, filestreamhelper;
+
+procedure ProcessNLSData(AIn: TFileStream; AOut: TFileTextStream);
+
+implementation
+
+uses
+  readheader;
+
+procedure ProcessNLSData(AIn: TFileStream; AOut: TFileTextStream);
+begin
+  AOut.WriteLn('');
+  AOut.WriteLn('NLS Data');
+  if hdr.nlslen > 0 then
+  begin
+    AOut.WriteLn('  <todo - process NLS data>');
+
+  end
+  else
+    AOut.WriteLn('NLS Data is not present');
+end;
+
+end.
+