/* Implementation of the size intrinsic.
Copyright 2002 Free Software Foundation, Inc.
Contributed by Paul Brook
This file is part of the GNU Fortran 95 runtime library (libgfor
Cluster is an allocation unit. If you create file lets say 1 byte in size, at least one cluster should be allocated on FAT file system. On NTFS if file is small enough, it can be stored in MFT record
Curses.program do |scr|
max_y, max_x = scr.maxy, scr.maxx
scr.setpos(0, 0)
scr.addstr("Your terminal size is #{max_x}x#{max_y}. Press any key to exit.")
scr.getch
end
#---
Ncurses.program do
Cluster is an allocation unit. If you create file lets say 1 byte in size, at least one cluster should be allocated on FAT file system. On NTFS if file is small enough, it can be stored in MFT record
