소스 검색

* tosunits: tabs to spaces and indendation change in gem.pas. no functional change.

Karoly Balogh 3 년 전
부모
커밋
c74a6f4ca2
1개의 변경된 파일42개의 추가작업 그리고 42개의 파일을 삭제
  1. 42 42
      packages/tosunits/src/gem.pas

+ 42 - 42
packages/tosunits/src/gem.pas

@@ -257,35 +257,35 @@ function menu_istart(me_flag: smallint; me_tree: AESTreePtr; me_imenu, me_item:
 function objc_add(ob_atree: AESTreePtr;	ob_aparent, ob_achild: smallint): smallint; overload;
 function objc_delete(ob_dltree: AESTreePtr; ob_dlobject: smallint): smallint; overload;
 function objc_draw(ob_drtree: AESTreePtr;
-	ob_drstartob, ob_drdepth,
-	ob_drxclip, ob_dryclip,
-	ob_drwclip, ob_drhclip: smallint): smallint; overload;
+                   ob_drstartob, ob_drdepth,
+                   ob_drxclip, ob_dryclip,
+                   ob_drwclip, ob_drhclip: smallint): smallint; overload;
 function objc_find(ob_ftree: AESTreePtr;
-	ob_fstartob, ob_fdepth,
-	ob_fmx, ob_fmy: smallint): smallint; overload;
+                   ob_fstartob, ob_fdepth,
+                   ob_fmx, ob_fmy: smallint): smallint; overload;
 function objc_offset(ob_oftree: AESTreePtr;
-	ob_ofobject: smallint;
-	out ob_ofxoff, ob_ofyoff: smallint): smallint; overload;
+                     ob_ofobject: smallint;
+                     out ob_ofxoff, ob_ofyoff: smallint): smallint; overload;
 function objc_order(ob_ortree: AESTreePtr;
-	ob_orobject, ob_ornewpos: smallint): smallint; overload;
+                    ob_orobject, ob_ornewpos: smallint): smallint; overload;
 function objc_edit(ob_edtree: AESTreePtr;
-	ob_edobject, ob_edchar: smallint;
-	var ob_edidx: smallint;
-	ob_edkind: smallint): smallint; overload;
+                   ob_edobject, ob_edchar: smallint;
+                   var ob_edidx: smallint;
+                   ob_edkind: smallint): smallint; overload;
 function objc_change(ob_ctree: AESTreePtr;
-	ob_cobject, ob_cresvd,
-	ob_xclip, ob_yclip,
-	ob_wclip, ob_hclip,
-	ob_cnewstate,
-	ob_credraw: smallint): smallint; overload;
+                     ob_cobject, ob_cresvd,
+                     ob_xclip, ob_yclip,
+                     ob_wclip, ob_hclip,
+                     ob_cnewstate,
+                     ob_credraw: smallint): smallint; overload;
 
 function form_do(fo_dotree: AESTreePtr;	fo_dostartob: smallint): smallint; overload;
 function form_center(fo_ctree: AESTreePtr; out fo_cx, fo_cy, fo_cw, fo_ch: smallint): smallint; overload;
 function form_keybd(fo_ktree: AESTreePtr;
-	fo_kobject, fo_kobnext, fo_kchar: smallint;
-	out fo_knxtobject, fo_knxtchar: smallint): smallint; overload;
+                    fo_kobject, fo_kobnext, fo_kchar: smallint;
+                    out fo_knxtobject, fo_knxtchar: smallint): smallint; overload;
 function form_button(fo_btree: AESTreePtr; fo_bobject, fo_bclicks: smallint;
-	out fo_bnxtobj: smallint): smallint; overload;
+                     out fo_bnxtobj: smallint): smallint; overload;
 
 function rsrc_obfix(re_obtree: AESTreePtr; re_oobject: smallint): smallint; overload;
 
@@ -411,22 +411,22 @@ end;
 
 function menu_bar(me_btree: AESTreePtr; me_bshow: smallint): smallint;
 begin
-	menu_bar := aes.menu_bar(@me_btree[0], me_bshow);
+  menu_bar := aes.menu_bar(@me_btree[0], me_bshow);
 end;
 
 function menu_icheck(me_ctree: AESTreePtr; me_citem, me_ccheck: smallint): smallint;
 begin
-	menu_icheck := aes.menu_icheck(@me_ctree[0], me_citem, me_ccheck);
+  menu_icheck := aes.menu_icheck(@me_ctree[0], me_citem, me_ccheck);
 end;
 
 function menu_ienable(me_etree: AESTreePtr; me_eitem, me_eenable: smallint): smallint;
 begin
-	menu_ienable := aes.menu_ienable(@me_etree[0], me_eitem, me_eenable);
+  menu_ienable := aes.menu_ienable(@me_etree[0], me_eitem, me_eenable);
 end;
 
 function menu_tnormal(me_ntree: AESTreePtr; me_ntitle, me_nnormal: smallint): smallint;
 begin
-	menu_tnormal := aes.menu_tnormal(@me_ntree[0], me_ntitle, me_nnormal);
+  menu_tnormal := aes.menu_tnormal(@me_ntree[0], me_ntitle, me_nnormal);
 end;
 
 function menu_text(me_ttree: AESTreePtr; me_titem: smallint; me_ttext: String): smallint;
@@ -457,47 +457,47 @@ begin
 end;
 
 function objc_draw(ob_drtree: AESTreePtr;
-	ob_drstartob, ob_drdepth,
-	ob_drxclip, ob_dryclip,
-	ob_drwclip, ob_drhclip: smallint): smallint;
+                   ob_drstartob, ob_drdepth,
+                   ob_drxclip, ob_dryclip,
+                   ob_drwclip, ob_drhclip: smallint): smallint;
 begin
   objc_draw:=aes.objc_draw(@ob_drtree[0], ob_drstartob, ob_drdepth, ob_drxclip, ob_dryclip, ob_drwclip, ob_drhclip);
 end;
 
 function objc_find(ob_ftree: AESTreePtr;
-	ob_fstartob, ob_fdepth,
-	ob_fmx, ob_fmy: smallint): smallint;
+                   ob_fstartob, ob_fdepth,
+                   ob_fmx, ob_fmy: smallint): smallint;
 begin
   objc_find:=aes.objc_find(@ob_ftree[0], ob_fstartob, ob_fdepth, ob_fmx, ob_fmy);
 end;
 
 function objc_offset(ob_oftree: AESTreePtr;
-	ob_ofobject: smallint;
-	out ob_ofxoff, ob_ofyoff: smallint): smallint;
+                     ob_ofobject: smallint;
+                     out ob_ofxoff, ob_ofyoff: smallint): smallint;
 begin
   objc_offset:=aes.objc_offset(@ob_oftree[0], ob_ofobject, ob_ofxoff, ob_ofyoff);
 end;
 
 function objc_order(ob_ortree: AESTreePtr;
-	ob_orobject, ob_ornewpos: smallint): smallint;
+                    ob_orobject, ob_ornewpos: smallint): smallint;
 begin
   objc_order:=aes.objc_order(@ob_ortree[0], ob_orobject, ob_ornewpos);
 end;
 
 function objc_edit(ob_edtree: AESTreePtr;
-	ob_edobject, ob_edchar: smallint;
-	var ob_edidx: smallint;
-	ob_edkind: smallint): smallint;
+                   ob_edobject, ob_edchar: smallint;
+                   var ob_edidx: smallint;
+                   ob_edkind: smallint): smallint;
 begin
   objc_edit:=aes.objc_edit(@ob_edtree[0], ob_edobject, ob_edchar, ob_edidx, ob_edkind);
 end;
 
 function objc_change(ob_ctree: AESTreePtr;
-	ob_cobject, ob_cresvd,
-	ob_xclip, ob_yclip,
-	ob_wclip, ob_hclip,
-	ob_cnewstate,
-	ob_credraw: smallint): smallint;
+                     ob_cobject, ob_cresvd,
+                     ob_xclip, ob_yclip,
+                     ob_wclip, ob_hclip,
+                     ob_cnewstate,
+                     ob_credraw: smallint): smallint;
 begin
   objc_change:=aes.objc_change(@ob_ctree[0], ob_cobject, ob_cresvd, ob_xclip, ob_yclip, ob_wclip, ob_hclip, ob_cnewstate, ob_credraw);
 end;
@@ -513,14 +513,14 @@ begin
 end;
 
 function form_keybd(fo_ktree: AESTreePtr;
-	fo_kobject, fo_kobnext, fo_kchar: smallint;
-	out fo_knxtobject, fo_knxtchar: smallint): smallint;
+                    fo_kobject, fo_kobnext, fo_kchar: smallint;
+                    out fo_knxtobject, fo_knxtchar: smallint): smallint;
 begin
   form_keybd:=aes.form_keybd(@fo_ktree[0], fo_kobject, fo_kobnext, fo_kchar, fo_knxtobject, fo_knxtchar);
 end;
 
 function form_button(fo_btree: AESTreePtr; fo_bobject, fo_bclicks: smallint;
-	out fo_bnxtobj: smallint): smallint;
+                     out fo_bnxtobj: smallint): smallint;
 begin
   form_button:=aes.form_button(@fo_btree[0], fo_bobject, fo_bclicks, fo_bnxtobj);
 end;