Data commit

Task/Strip-block-comments/J/strip-block-comments-1.j

@@ -0,0 +1,6 @@
+strip=:#~1 0 _1*./@:(|."0 1)2>4{"1(5;(0,"0~".;._2]0 :0);'/*'i.a.)&;:
+  1 0 0
+  0 2 0
+  2 3 2
+  0 2 2
+)

Task/Strip-block-comments/J/strip-block-comments-2.j

@@ -0,0 +1,18 @@
+example=: 0 :0
+  /**
+   * Some comments
+   * longer comments here that we can parse.
+   *
+   * Rahoo
+   */
+   function subroutine() {
+    a = /* inline comment */ b + c ;
+   }
+   /*/ <-- tricky comments */
+
+   /**
+    * Another comment.
+    */
+    function something() {
+    }
+)

Task/Strip-block-comments/J/strip-block-comments-3.j

@@ -0,0 +1,10 @@
+   strip example
+
+   function subroutine() {
+    a =  b + c ;
+   }
+
+
+
+    function something() {
+    }

Task/Strip-block-comments/J/strip-block-comments-4.j

@@ -0,0 +1,7 @@
+stripp=:3 :0
+  ('/*';'*/') stripp y
+:
+  'open close'=. x
+  marks=. (+./(-i._1+#open,close)|."0 1 open E. y) - close E.&.|. y
+  y #~  -. (+._1&|.) (1 <. 0 >. +)/\.&.|. marks
+)