설명

이 테스트는 싱글톤 세트에 대한 할당 동작을 확인합니다.

기고자: Lutz Westermann, 2014년 2월

소형 모델 유형 :무료 슬롯 사이트

카테고리 : 무료 슬롯 사이트 테스트 라이브러리

메인 파일 : single02.gms

$title '싱글톤 세트에 대한 할당 확인' (SINGLE02,SEQ=641)

$onText
이 테스트는 싱글톤 세트에 대한 할당 동작을 확인합니다.

기고자: Lutz Westermann, 2014년 2월
$offText

* 아래 테스트를 위한 매크로 정의
$macro notSame(a,b,size) sum(i$(a(i) and not(b(i))),1) + sum(i$(b(i) and not(a(i))),1) <> 0 또는 카드(iHave) <> 크기

i /i1*i3/을 설정합니다.
싱글톤 세트 iWant(i) / i3/
              iHave(i) / i3/;

* 명백함: 동일한 정의 이후
abort$[notSame(iWant,iHave,1)] 'iWant <> iHave', iWant, iHave;

* 새 할당에서는 먼저 콘텐츠를 지워야 합니다.
iWant('i2') = 예;
iHave('i2') = 예;
abort$[notSame(iWant,iHave,1)] 'iWant <> iHave', iWant, iHave;

* 새로운 할당은 할당된 것이 없더라도 먼저 콘텐츠를 지워야 합니다.
옵션 클리어=iWant;
iHave(i) = 1=0;
abort$[notSame(iWant,iHave,0)] 'iWant <> iHave', iWant, iHave;

* 둘 이상의 항목이 있는 싱글톤 세트에 대한 $onStrictSingleton 데이터 문은 허용되지 않습니다.
$onEcho > onStrictSingleton.gms
$onStrict싱글턴
i /i1*i3/을 설정합니다.
싱글톤 세트 d(i) /i2,i3/;
$offEcho
'무료 슬롯 사이트 onStrictSingleton.gms lo=%무료 슬롯 사이트lo%'를 실행합니다.
abort$(errorlevel=0) 'onStrictSingleton.gms에 대한 오류가 예상됩니다.';

* 둘 이상의 항목이 있는 싱글톤 세트에 대한 $offStrictSingleton 데이터 문이 허용됩니다.
$onEcho > offStrictSingleton.gms
$offStrict싱글턴
i /i1*i3/을 설정합니다.
싱글톤 세트 d(i) /i2,i3/;
abort$[card(d) <> 1] '잘못된 D 카드';
abort$[sumd(i), 1$sameas('i2',i) <> 1] '잘못된 d 요소';
$offEcho
'무료 슬롯 사이트 offStrictSingleton.gms lo=%무료 슬롯 사이트lo%'를 실행합니다.
abort$[errorlevel<>0] 'offStrictSingleton.gms에 대한 오류가 예상되지 않습니다.';

* 이제 strictSingleton=0,1을 테스트하세요.