mirror of
https://github.com/sasjs/core.git
synced 2025-12-11 06:24:35 +00:00
40 lines
907 B
SAS
40 lines
907 B
SAS
/**
|
|
@file
|
|
@brief Testing mp_gitstatus.sas macro
|
|
|
|
<h4> SAS Macros </h4>
|
|
@li mf_deletefile.sas
|
|
@li mf_writefile.sas
|
|
@li mp_gitstatus.sas
|
|
@li mp_assertdsobs.sas
|
|
|
|
**/
|
|
|
|
/* clone the source repo */
|
|
%let dir = %sysfunc(pathname(work))/core;
|
|
%put source clone rc=%sysfunc(GITFN_CLONE(https://github.com/sasjs/core,&dir));
|
|
|
|
%mp_gitstatus(&dir,outds=work.gitstatus)
|
|
|
|
%mp_assert(
|
|
iftrue=(&syscc=0),
|
|
desc=Initial mp_gitstatus runs without errors,
|
|
outds=work.test_results
|
|
)
|
|
|
|
/* should be empty as there are no changes yet */
|
|
%mp_assertdsobs(work.gitstatus,test=EMPTY)
|
|
|
|
/* add a file */
|
|
%mf_writefile(&dir/somefile.txt,l1=some content)
|
|
/* change a file */
|
|
%mf_writefile(&dir/readme.md,l1=new readme)
|
|
/* delete a file */
|
|
%mf_deletefile(&dir/package.json)
|
|
|
|
/* re-run git status */
|
|
%mp_gitstatus(&dir,outds=work.gitstatus)
|
|
|
|
/* should be three changes now */
|
|
%mp_assertdsobs(work.gitstatus,test=EQUALS 3)
|