This is the revision history for ln in <*:##NULL>
| factoid_id | subject | copula | predicate | author | namespace |
|---|---|---|---|---|---|
| 12728 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] existing_factoid new_factoid>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Stored async is [fact events [arg]] |
simcop2387 | |
| 12727 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] source_file target_file>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | |
| 12726 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] source dest>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | |
| 12697 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | |
| 12679 | ln | is | [fact ##NULL ln [arg]] Not Available |
simcop2387 | |
| 12678 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | |
| 12677 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg!!;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"!! Not Available |
simcop2387 | |
| 12637 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 | |
| 12634 | ln | is | `compose `eval $a=`fact _getarg_perl_array `arg~~;$s=$a->[0]eq'-s'; @$a=grep{!/-s/}@$a; if(@$a!=2){return "<echo Syntax: ln [-s] one two>"}; ($l,$r)=@$a; return "<fact macro $r is [fact $l [arg]]>" if $s; "<fact $r is <fact $l>>"~~ Not Available |
simcop2387 |