diff --git a/lib/stdlib.pas b/lib/stdlib.pas
index c1da7de..cbd0840 100644
--- a/lib/stdlib.pas
+++ b/lib/stdlib.pas
@@ -47,7 +47,7 @@ type file = record
 			ateof:boolean;
 			noecho:boolean; (* read chars are not echoed *)
 			raw:boolean;  (* turn off backspace processing on input, CR processing on output *)
-			nointr: boolean); (* turn off keyboard interrupt character processing *)
+			nointr:boolean); (* turn off keyboard interrupt character processing *)
 
 		IODiskFile: (volumeid: integer;fileno: integer; filpos:integer; bufStart:integer;
 				size:integer; sizeExtents:integer;
@@ -480,6 +480,9 @@ end;
    That means you cannot use pos to search inside a string
    literal. Hopefully this is not something you want to do.
    *)
+
+(* TODO: UCSD-Pascal and TP3.0 specs say, searched string
+   is a string expression so cannot be var parameter *)
 function pos(substr:string;var s:string):integer;
 var substrlen:integer;
     slen:integer;
diff --git a/pcomp/pcomp.pas b/pcomp/pcomp.pas
index 205ee3f..8936f7a 100644
--- a/pcomp/pcomp.pas
+++ b/pcomp/pcomp.pas
@@ -1,4 +1,6 @@
 (* Copyright 2021-2024 Sebastian Lederer. See the file LICENSE.md for details *)
+{$H384}
+{$S64}
 program PascalCompiler;
 {$R+}
 {$!}{$ifdef FPC}uses math,crt;{$endif}