summaryrefslogtreecommitdiff
path: root/src/Gtk
diff options
context:
space:
mode:
Diffstat (limited to 'src/Gtk')
-rw-r--r--src/Gtk/Internal.icl13
1 files changed, 1 insertions, 12 deletions
diff --git a/src/Gtk/Internal.icl b/src/Gtk/Internal.icl
index 8f3a8ad..8704e35 100644
--- a/src/Gtk/Internal.icl
+++ b/src/Gtk/Internal.icl
@@ -84,20 +84,9 @@ where
ccall gtk_frame_new "s:p:A"
}
-// TODO: convert double to float properly
gtk_frame_set_label_align :: !Pointer !Real !Real !.a -> .a
gtk_frame_set_label_align frame xalign yalign env = code {
- | cvtsd2ss %xmm0,%xmm0
- instruction 242
- instruction 15
- instruction 90
- instruction 192
- | cvtsd2ss %xmm1,%xmm1
- instruction 242
- instruction 15
- instruction 90
- instruction 201
- ccall gtk_frame_set_label_align "pRR:V:A"
+ ccall gtk_frame_set_label_align "prr:V:A"
}
gtk_init :: !.a -> .a