X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=opcode.pl;h=01db0252424b509194dddb44ce488bde70fb972e;hb=14ae36e97ba8d6550ac6e83fc3fd01cef28b74ad;hp=2de2bf43318781efa3e78aeeceeeead558191b03;hpb=867fa1e2da145229b4db2c6e8d5b51700c15f114;p=p5sagit%2Fp5-mst-13.2.git diff --git a/opcode.pl b/opcode.pl index 2de2bf4..01db025 100755 --- a/opcode.pl +++ b/opcode.pl @@ -810,6 +810,7 @@ exists exists ck_exists is% S rv2hv hash dereference ck_rvconst dt1 helem hash element ck_null s2 H S hslice hash slice ck_null m@ H L +boolkeys boolkeys ck_fun % H # Explosives and implosives. @@ -1067,7 +1068,7 @@ hintseval eval hints ck_svconst s$ entereval eval "string" ck_eval d% S leaveeval eval "string" exit ck_null 1 S #evalonce eval constant string ck_null d1 S -entertry eval {block} ck_null | +entertry eval {block} ck_eval d% leavetry eval {block} exit ck_null @ # Get system info. @@ -1116,5 +1117,3 @@ lock lock ck_rfun s% R once once ck_null | custom unknown custom operator ck_null 0 - -boolkeys boolkeys ck_fun % H