Не работает на некоторых нативных классах

G_Z 29.09.2016 04:17

@main[]
# column not found
table: ^if(^has[^table::create{column};foreach])[y;n]<br/>

# element can not be fetched from string
string: ^if(^has[123;foreach])[y;n]<br/>

# reading of invalid field
regex: ^if(^has[^regex::create[.+];foreach])[y;n]<br/>
console: ^if(^has[$console:CLASS;foreach])[y;n]<br/>

@has[object;method]
$result($object.$method is junction || $object.CLASS.$method is junction)