g-semaph.adb 3.24 KB