diff --git a/src/u_gdb.pas b/src/u_gdb.pas
index 3e442ab5..c09b2642 100644
--- a/src/u_gdb.pas
+++ b/src/u_gdb.pas
@@ -2882,7 +2882,7 @@ const
 var
   cmd : string;
 begin
-  cmd := format(spec, [GetEnumName(typeinfo(TCpuRegister),integer(reg)), val]);
+  cmd := format(spec, [GetEnumName(typeinfo(TCpuRegister), integer(reg)), val]);
   gdbCommand(cmd);
 end;
 
@@ -2892,7 +2892,17 @@ const
 var
   cmd : string;
 begin
-  cmd := format(spec, [GetEnumName(typeinfo(TSegRegister),integer(reg)), val]);
+  cmd := format(spec, [GetEnumName(typeinfo(TSegRegister), integer(reg)), val]);
+  gdbCommand(cmd);
+end;
+
+procedure TGdbWidget.setFpr(reg: TFpuRegister; val: extended);
+const
+  spec = 'set $%s = %.18g';
+var
+  cmd : string;
+begin
+  cmd := format(spec, [GetEnumName(typeinfo(TFpuRegister), integer(reg)), val]);
   gdbCommand(cmd);
 end;
 
@@ -2905,16 +2915,6 @@ begin
   cmd := format(spec, [val]);
   gdbCommand(cmd);
 end;
-
-procedure TGdbWidget.setFpr(reg: TFpuRegister; val: extended);
-const
-  spec = 'set $%s = %.18g';
-var
-  cmd : string;
-begin
-  cmd := format(spec, [GetEnumName(typeinfo(TFpuRegister),integer(reg)), val]);
-  gdbCommand(cmd);
-end;
 {$ENDREGION}
 
 initialization