Subversion Repositories Kolibri OS

Rev

Rev 8859 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8859 Rev 9577
Line 1... Line 1...
1 
(*
 1 
(*
2 
    Copyright 2016, 2018 Anton Krotov
 2 
    Copyright 2016, 2018, 2022 Anton Krotov
Line 3... Line 3...
3 
 
 3 
 
4 
    This program is free software: you can redistribute it and/or modify
 4 
    This program is free software: you can redistribute it and/or modify
5 
    it under the terms of the GNU Lesser General Public License as published by
 5 
    it under the terms of the GNU Lesser General Public License as published by
6 
    the Free Software Foundation, either version 3 of the License, or
 6 
    the Free Software Foundation, either version 3 of the License, or
Line 283... Line 283...
283 
  info.subfunc := 7;
 283 
  info.subfunc := 7;
284 
  info.flags := 0;
 284 
  info.flags := 0;
285 
  info.param := sys.SADR(" ");
 285 
  info.param := sys.SADR(" ");
286 
  info.rsrvd1 := 0;
 286 
  info.rsrvd1 := 0;
287 
  info.rsrvd2 := 0;
 287 
  info.rsrvd2 := 0;
288 
  info.fname := "/rd/1/develop/board";
 288 
  info.fname := "/sys/develop/board";
289 
  res := KOSAPI.sysfunc2(70, sys.ADR(info))
 289 
  res := KOSAPI.sysfunc2(70, sys.ADR(info))
290 
END Open;
 290 
END Open;
Line 291... Line 291...
291 
 
 291 
 
292 
END Debug.
 292 
END Debug.