PageRenderTime 593ms CodeModel.GetById 49ms RepoModel.GetById 9ms app.codeStats 0ms

/shlomif-settings/Bash/Themes/themes/perl/ffo/source.bash

https://bitbucket.org/shlomif/shlomif-computer-settings
BASH | 78 lines | 68 code | 10 blank | 0 comment | 3 complexity | a583a2fd1ecbb3ff6d69431c7c20bdfc MD5 | raw file
  1. load_common mymake
  2. load_common completion
  3. load_common prompt
  4. base="$HOME/progs/perl/cpan/File/Find-Object"
  5. ffo_trunk="$base/trunk"
  6. module="$ffo_trunk"
  7. bench="$base/benchmark"
  8. berlios_base="$base/from-berlios"
  9. hg_base="$berlios_base"
  10. berlios_trunk="$berlios_base/trunk"
  11. ffor_trunk="$berlios_trunk"
  12. rule_trunk="$berlios_trunk/File-Find-Object-Rule"
  13. libfilefind="$berlios_trunk/libfilefind/c_glib_based"
  14. rule_remote_repo='ssh://hg@bitbucket.org/shlomif/perl-file-find-object-rule'
  15. ffo_remote_repo='ssh://hg@bitbucket.org/shlomif/perl-file-find-object'
  16. this="$module"
  17. setup()
  18. {
  19. (
  20. mkdir -p "$hg_base"
  21. cd "$hg_base"
  22. hg clone "$rule_remote_repo" "$ffor_trunk"
  23. mkdir -p "$base"
  24. cd "$base"
  25. hg clone "$ffo_remote_repo" "$ffo_trunk"
  26. )
  27. cd "$this"
  28. }
  29. cd "$this"
  30. t()
  31. {
  32. cd "$this" && ./Build runtest
  33. }
  34. e()
  35. {
  36. (cd "$this" && gvim -p $(ack -f lib/))
  37. }
  38. prompt()
  39. {
  40. __prompt_cmd \
  41. "\$libfilefind=$libfilefind" \
  42. "\$rule_trunk=$rule_trunk" \
  43. "\$berlios_trunk=$rule_trunk" \
  44. "\$ffo_trunk=$ffo_trunk" \
  45. "\$base=$base" \
  46. "~=$HOME"
  47. }
  48. run_prof()
  49. {
  50. (cd "$bench" &&
  51. (
  52. rm -f nytprof.out
  53. perl -d:NYTProf -I "$trunk/lib" print-all.pl > /dev/null
  54. rm -fr nytprof
  55. nytprofhtml
  56. if test -z "$DONT_DEL" ; then
  57. rm -f nytprof.out
  58. fi
  59. )
  60. )
  61. }
  62. view_prof()
  63. {
  64. (cd "$bench" &&
  65. (firefox ./nytprof/index.html)
  66. )
  67. }
  68. proj_name='File-Find-Object'