/* p6 - 107

Язык Turbo C 2.0
a - простые переменные
j - глобальные переменные
s () - функции
aa - указатели
1 - 12k, 3 - 13k, 4 - 16k
*/
#include <conio.h>
#include <setjmp.h>
#include <stdio.h>
#include <stdlib.h>
#define M 1 /* нет памяти */
#define N 2 /* ошибка файла */
int j = 7;
jmp_buf p; /* буфер нелокального перехода */
s (); t (); u ();
v (); w (); x ();
main (int a, char *aa [], char *ab [])
{
int d;
int j = 10;
printf ("1.\n");
printf ("a) j = %i.\n", j);
j++;
{
int j = 200;
printf ("b) j = %i.\n", j);
j++;
}
printf ("c) j = %i.\n", j++);
s ();
printf ("d) j = %i.\n", j++);
t ();
printf ("e) j = %i.\n", j++);
t ();
printf ("f) j = %i.\n", j++);
printf ("\n2. ");
if (a < 2)
printf ("Вы забыли набрать имя.\n");
else
printf ("Привет! %s!\n", aa [1]);
printf ("\n3. Количество аргументов командной строки: %i.\n", a);
printf ("Аргументы командной строки:\n");
for (d = 0; d < a; d++) printf ("%s\n", aa [d]);
printf ("Аргументы состояния среды:\n");
for (d = 0; ab [d]; d++) printf ("%s\n", ab [d]);
puts ("\n4. Вызываем 'u ()'.");
u ();
puts ("Конец работы функции 'u ()'.");
getch ();
printf ("\n");
}
s ()
{
int j = 77;
printf ("g) j = %i.\n", j);
j++;
}
t ()
{
printf ("h) j = %i.\n", j);
j++;
}
u ()
{
int a;
if ((a = setjmp (p)) != 0)
{
switch (a)
{
case M: puts ("Нет памяти."); return;
case N: puts ("Не могу открыть файл."); return;
}
}
printf ("Результат: %i.\n", v ());
}
v () {w ();}
w ()
{
void *a;
if ((a = malloc (4096)) == NULL) longjmp (p, M); /* ошибка - недостаточно памяти */
x ();
free (a);
return 1;
}
x ()
{
FILE *a;
if ((a = fopen ("zz.txt", "r")) == NULL) longjmp (p, N); /* ошибка открытия файла */
fclose (a);
return 2;
}