diff --git a/Ofront/Code/OPM.ocf b/Ofront/Code/OPM.ocf index 8d1c63843..0986f1f52 100644 Binary files a/Ofront/Code/OPM.ocf and b/Ofront/Code/OPM.ocf differ diff --git a/Ofront/Mod/OPM.odc b/Ofront/Mod/OPM.odc index 97ecb8219..669b673a5 100644 Binary files a/Ofront/Mod/OPM.odc and b/Ofront/Mod/OPM.odc differ diff --git a/Ofront/Mod/Text/OPM.txt b/Ofront/Mod/Text/OPM.txt index 99434a2b8..16c99c862 100644 --- a/Ofront/Mod/Text/OPM.txt +++ b/Ofront/Mod/Text/OPM.txt @@ -526,6 +526,7 @@ MODULE OfrontOPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 8.5.95*) MinReal := -MaxReal; MinLReal := -MaxLReal; IF IntSize = 4 THEN MinInt := MinLInt; MaxInt := MaxLInt END ; + IF SIntSize = 2 THEN MinSInt := -8000H; MaxSInt := 7FFFH END ; MaxSet := SetSize * 8 - 1; MaxIndex := MaxLInt END GetProperties;