Strip block comments: Difference between revisions

Content deleted Content added
Rdm (talk | contribs)
Rdm (talk | contribs)
Line 112: Line 112:
=={{header|J}}==
=={{header|J}}==


<lang j>str=:#~1 0 _1*./@:(|."0 1)2>4{"1(5;(0,"0~".;._2]0 :0);'/*'i.a.)&;:
<lang j>strip=:#~1 0 _1*./@:(|."0 1)2>4{"1(5;(0,"0~".;._2]0 :0);'/*'i.a.)&;:
1 0 0
1 0 0
0 2 0
0 2 0
Line 142: Line 142:
Example use:
Example use:


<lang j> str example
<lang j> strip example
function subroutine() {
function subroutine() {