fork download
  1. {$MODE OBJFPC}{$H+}
  2. {$MODESWITCH ADVANCEDRECORDS}
  3. type TS = record
  4. private
  5. a: integer;
  6. strict private
  7. b: integer;
  8. end;
  9.  
  10. var
  11. s: TS;
  12.  
  13. begin
  14. s.a := 1; // OK
  15. s.b := 1; // NG
  16. end.
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
Free Pascal Compiler version 3.0.4+dfsg-22 [2019/01/24] for x86_64
Copyright (c) 1993-2017 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling prog.pas
prog.pas(15,5) Error: identifier idents no member "b"
prog.pas(16,4) Fatal: There were 1 errors compiling module, stopping
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode
stdout
Standard output is empty