diff --git a/rtl/nds/system.pp b/rtl/nds/system.pp index 31f9583e40..7f32145fa3 100644 --- a/rtl/nds/system.pp +++ b/rtl/nds/system.pp @@ -159,7 +159,7 @@ function paramstr(l: longint) : string; begin paramstr := execpathstr; end - else (l > 0) and (l < argc) then + else if (l > 0) and (l < argc) then paramstr := strpas(argv[l]) else paramstr := ''; diff --git a/rtl/wii/system.pp b/rtl/wii/system.pp index 182e0ed22e..1ce5510c4c 100644 --- a/rtl/wii/system.pp +++ b/rtl/wii/system.pp @@ -128,7 +128,7 @@ function paramstr(l: longint) : string; begin paramstr := execpathstr; end - else (l > 0) and ( l < argc ) then + else if (l > 0) and ( l < argc ) then paramstr:=strpas(argv[l]) else paramstr:='';