Phil Newton Sodaware

## grow_test.bmx
SuperStrict

Framework brl.basic

Const ITERATIONS:Int = 10000
Const BAG_SIZE:Int   = 10000

Local startTime:Int
Local totalTime:Int

## array_copy_test.bmx
Framework brl.basic

Const ITERATIONS:Int = 1000000
Const ARRAY_SIZE:Int = 1000

Local startTime:Int

' ------------------------------------------------------------------------------
' -- Copying arrays of Int

## phing-call.el
(defun phing-call (target)
  "Call Phing's build.xml"

  ;; Ask for target to execute
  (interactive "MPhing Target: ")

  ;; Open a new *phing-compilation* buffer & kill the old one
  (let ((oldbuf (get-buffer "*phing-compilation*")))
    (if (not (null oldbuf))
        (kill-buffer "*phing-compilation*")))

## php-extract-function.el
(defun php-extract-function (start end name)
  "Moves the currently marked text to a new function"

  ;; Prompt for new method name
  (interactive "r\nsNew Function Name: ")

  ;; Kill selected region
  (kill-region start end)

  ;; Insert call to new function
	SuperStrict

	Framework brl.basic

	Const ITERATIONS:Int = 10000
	Const BAG_SIZE:Int = 10000

	Local startTime:Int
	Local totalTime:Int
	Framework brl.basic

	Const ITERATIONS:Int = 1000000
	Const ARRAY_SIZE:Int = 1000

	Local startTime:Int

	' ------------------------------------------------------------------------------
	' -- Copying arrays of Int
	(defun phing-call (target)
	"Call Phing's build.xml"

	;; Ask for target to execute
	(interactive "MPhing Target: ")

	;; Open a new phing-compilation buffer & kill the old one
	(let ((oldbuf (get-buffer "phing-compilation")))
	(if (not (null oldbuf))
	(kill-buffer "phing-compilation")))
	(defun php-extract-function (start end name)
	"Moves the currently marked text to a new function"

	;; Prompt for new method name
	(interactive "r\nsNew Function Name: ")

	;; Kill selected region
	(kill-region start end)

	;; Insert call to new function